GTR1 distribution

Time bar (total: 1.6min)

start0.0ms (0%)

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

analyze79.0ms (0.1%)

Memory
-5.3MiB live, 97.5MiB allocated; 41ms collecting garbage
Algorithm
1×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%0.6%99.4%0%0%0%0
0%0%0.6%99.4%0%0%0%1
0%0%0.6%99.4%0%0%0%2
0%0%0.6%99.4%0%0%0%3
0%0%0.6%99.4%0%0%0%4
50%0.3%0.3%99.4%0%0%0%5
50%0.3%0.3%99.4%0%0%0%6
75%0.5%0.2%99.4%0%0%0%7
75%0.5%0.2%99.4%0%0%0%8
87.5%0.6%0.1%99.4%0%0%0%9
87.5%0.6%0.1%99.4%0%0%0%10
93.7%0.6%0%99.4%0%0%0%11
93.7%0.6%0%99.4%0%0%0%12
Compiler

Compiled 40 to 23 computations (42.5% saved)

sample1.1s (1.2%)

Memory
19.2MiB live, 1 638.8MiB allocated; 257ms collecting garbage
Samples
841.0ms8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 645.0ms
ival-mult: 300.0ms (46.5% of total)
ival-log: 156.0ms (24.2% of total)
ival-div: 57.0ms (8.8% of total)
ival-sub: 43.0ms (6.7% of total)
ival-add: 40.0ms (6.2% of total)
ival-pi: 30.0ms (4.7% of total)
exact: 8.0ms (1.2% of total)
const: 4.0ms (0.6% of total)
adjust: 3.0ms (0.5% of total)
ival-assert: 2.0ms (0.3% of total)
ival-and: 1.0ms (0.2% of total)
ival-<=: 1.0ms (0.2% of total)
Bogosity

explain158.0ms (0.2%)

Memory
-18.9MiB live, 233.2MiB allocated; 17ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
00-0-(*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)))
00-0-(PI.f32)
00-0-#s(literal 1 binary32)
00-0-cosTheta
00-0-alpha
00-0-(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
00-0-(*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)))
00-0-(-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
00-0-(*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)
00-0-(log.f32 (*.f32 alpha alpha))
00-0-(*.f32 alpha alpha)
00-0-(*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta)
00-0-(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))
Confusion
Predicted +Predicted -
+00
-0256
Precision
0/0
Recall
0/0
Confusion?
Predicted +Predicted MaybePredicted -
+000
-00256
Precision?
0/0
Recall?
0/0
Freqs
test
numberfreq
0256
Total Confusion?
Predicted +Predicted MaybePredicted -
+000
-001
Precision?
0/0
Recall?
0/0
Samples
51.0ms512×0valid
Compiler

Compiled 210 to 43 computations (79.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 35.0ms
ival-mult: 18.0ms (51.2% of total)
ival-log: 6.0ms (17.1% of total)
ival-div: 4.0ms (11.4% of total)
ival-pi: 2.0ms (5.7% of total)
ival-add: 2.0ms (5.7% of total)
ival-sub: 2.0ms (5.7% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

preprocess175.0ms (0.2%)

Memory
-14.5MiB live, 122.1MiB allocated; 17ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
040146
1170146
2616146
33554144
01324
02324
15524
222424
3127924
4727624
0856121
Stop Event
1×iter limit
1×node limit
1×iter limit
1×node limit
Calls
Call 1
Inputs
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
Outputs
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
(/.f32 (fma.f32 (/.f32 (/.f32 alpha (-.f32 (*.f32 (*.f32 cosTheta (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) cosTheta) #s(literal -1 binary32))) (PI.f32)) alpha (/.f32 #s(literal -1 binary32) (*.f32 (-.f32 (*.f32 (*.f32 cosTheta (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) cosTheta) #s(literal -1 binary32)) (PI.f32)))) (log.f32 (*.f32 alpha alpha)))
Symmetry

(abs cosTheta)

(abs alpha)

Compiler

Compiled 24 to 13 computations (45.8% saved)

eval0.0ms (0%)

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

Compiled 0 to 2 computations (-∞% saved)

prune0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶98.4%
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
Compiler

Compiled 24 to 13 computations (45.8% saved)

series75.0ms (0.1%)

Memory
3.9MiB live, 47.7MiB allocated; 5ms collecting garbage
Counts
13 → 61
Calls
Call 1
Inputs
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
(-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(*.f32 alpha alpha)
alpha
#s(literal 1 binary32)
(*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)))
(*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)))
(PI.f32)
(log.f32 (*.f32 alpha alpha))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))
(*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)
(*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta)
cosTheta
Outputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (PI) (log (pow alpha 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2)) (* (PI) (log (pow alpha 2))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 3)) (* (PI) (log (pow alpha 2)))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 4)) (* (PI) (log (pow alpha 2))))) (* -1 (/ (pow (- (pow alpha 2) 1) 3) (* (PI) (log (pow alpha 2))))))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (PI) (log (pow alpha 2)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (+ (* (PI) (log (pow alpha 2))) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 1))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (* (pow cosTheta 2) (- (pow alpha 2) 1))))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (* cosTheta (- (pow alpha 2) 1))))
#s(approx cosTheta #s(hole binary32 cosTheta))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3))))))) (pow cosTheta 2))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (+ (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))) (/ (* (PI) (log (pow alpha 2))) (pow cosTheta 2))))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (pow alpha 2) 1))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ 1 (pow cosTheta 2)) (pow alpha 2)) 1))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 -1))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (- (pow alpha 2) 1)))
#s(approx (* alpha alpha) #s(hole binary32 (pow alpha 2)))
#s(approx alpha #s(hole binary32 alpha))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* 2 (* (PI) (log alpha)))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* 2 (log alpha))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2))))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (* -1 (pow cosTheta 2))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2)))))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (* -1 cosTheta)))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) cosTheta))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (pow alpha 2)))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (* (pow alpha 2) (- 1 (/ 1 (pow alpha 2))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))) (pow alpha 2)))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* -2 (* (PI) (log (/ 1 alpha))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* -2 (log (/ 1 alpha)))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (+ (/ 1 (pow alpha 2)) (pow cosTheta 2))))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (pow cosTheta 2)))))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (* (pow alpha 2) cosTheta)))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ cosTheta (* -1 (/ cosTheta (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))) (pow alpha 2)))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* -2 (* (PI) (log (/ -1 alpha))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* -2 (log (/ -1 alpha)))))
Calls

6 calls:

TimeVariablePointExpression
24.0ms
alpha
@0
((/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (- (* alpha alpha) 1) (* alpha alpha) alpha 1 (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (PI) (log (* alpha alpha)) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) (* (- (* alpha alpha) 1) cosTheta) cosTheta)
17.0ms
alpha
@inf
((/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (- (* alpha alpha) 1) (* alpha alpha) alpha 1 (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (PI) (log (* alpha alpha)) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) (* (- (* alpha alpha) 1) cosTheta) cosTheta)
13.0ms
alpha
@-inf
((/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (- (* alpha alpha) 1) (* alpha alpha) alpha 1 (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (PI) (log (* alpha alpha)) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) (* (- (* alpha alpha) 1) cosTheta) cosTheta)
11.0ms
cosTheta
@0
((/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (- (* alpha alpha) 1) (* alpha alpha) alpha 1 (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (PI) (log (* alpha alpha)) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) (* (- (* alpha alpha) 1) cosTheta) cosTheta)
5.0ms
cosTheta
@inf
((/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (- (* alpha alpha) 1) (* alpha alpha) alpha 1 (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (PI) (log (* alpha alpha)) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) (* (- (* alpha alpha) 1) cosTheta) cosTheta)

rewrite184.0ms (0.2%)

Memory
16.0MiB live, 199.4MiB allocated; 35ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03052886
03242685
117212664
080982594
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
74 → 156
Calls
Call 1
Inputs
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
(-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(*.f32 alpha alpha)
alpha
#s(literal 1 binary32)
(*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)))
(*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)))
(PI.f32)
(log.f32 (*.f32 alpha alpha))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))
(*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)
(*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta)
cosTheta
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (PI) (log (pow alpha 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2)) (* (PI) (log (pow alpha 2))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 3)) (* (PI) (log (pow alpha 2)))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 4)) (* (PI) (log (pow alpha 2))))) (* -1 (/ (pow (- (pow alpha 2) 1) 3) (* (PI) (log (pow alpha 2))))))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (PI) (log (pow alpha 2)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (+ (* (PI) (log (pow alpha 2))) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 1))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (* (pow cosTheta 2) (- (pow alpha 2) 1))))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (* cosTheta (- (pow alpha 2) 1))))
#s(approx cosTheta #s(hole binary32 cosTheta))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3))))))) (pow cosTheta 2))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (+ (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))) (/ (* (PI) (log (pow alpha 2))) (pow cosTheta 2))))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (pow alpha 2) 1))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ 1 (pow cosTheta 2)) (pow alpha 2)) 1))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 -1))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (- (pow alpha 2) 1)))
#s(approx (* alpha alpha) #s(hole binary32 (pow alpha 2)))
#s(approx alpha #s(hole binary32 alpha))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* 2 (* (PI) (log alpha)))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* 2 (log alpha))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2))))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (* -1 (pow cosTheta 2))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2)))))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (* -1 cosTheta)))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) cosTheta))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (pow alpha 2)))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (* (pow alpha 2) (- 1 (/ 1 (pow alpha 2))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))) (pow alpha 2)))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* -2 (* (PI) (log (/ 1 alpha))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* -2 (log (/ 1 alpha)))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (+ (/ 1 (pow alpha 2)) (pow cosTheta 2))))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (pow cosTheta 2)))))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (* (pow alpha 2) cosTheta)))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ cosTheta (* -1 (/ cosTheta (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))) (pow alpha 2)))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* -2 (* (PI) (log (/ -1 alpha))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* -2 (log (/ -1 alpha)))))
Outputs
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (PI.f32)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
(/.f32 (neg.f32 (/.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha)))) (neg.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 (neg.f32 (neg.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (neg.f32 (neg.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))))
(/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) #s(literal 1 binary32))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))))
(/.f32 (neg.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (neg.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))))
(/.f32 (/.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
(-.f32 (/.f32 (/.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))) (/.f32 (/.f32 (/.f32 #s(literal 1 binary32) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(-.f32 (*.f32 (/.f32 (neg.f32 alpha) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (neg.f32 alpha) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))) (/.f32 (/.f32 #s(literal 1 binary32) (PI.f32)) (log.f32 (*.f32 alpha alpha)))))
(expm1.f32 (log.f32 (*.f32 alpha alpha)))
(*.f32 (pow.f32 (+.f32 alpha #s(literal 1 binary32)) #s(literal 1 binary32)) (pow.f32 (-.f32 alpha #s(literal 1 binary32)) #s(literal 1 binary32)))
(*.f32 (+.f32 alpha #s(literal 1 binary32)) (-.f32 alpha #s(literal 1 binary32)))
(/.f32 (neg.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 2 binary32)) #s(literal 1 binary32))) (neg.f32 (fma.f32 (neg.f32 alpha) (neg.f32 alpha) #s(literal 1 binary32))))
(/.f32 (neg.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32))) (neg.f32 (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
(/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 2 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 alpha) (neg.f32 alpha) #s(literal 1 binary32)))
(/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
(/.f32 #s(literal 1 binary32) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal -1 binary32)))
(-.f32 (/.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 2 binary32)) (fma.f32 (neg.f32 alpha) (neg.f32 alpha) #s(literal 1 binary32))) (/.f32 #s(literal 1 binary32) (fma.f32 (neg.f32 alpha) (neg.f32 alpha) #s(literal 1 binary32))))
(-.f32 (/.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (/.f32 #s(literal 1 binary32) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
(-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))
(exp.f32 (*.f32 (log.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) #s(literal 1 binary32)))
(*.f32 (neg.f32 (neg.f32 alpha)) (neg.f32 (neg.f32 alpha)))
(*.f32 (neg.f32 (fabs.f32 alpha)) (neg.f32 (fabs.f32 alpha)))
(*.f32 (fabs.f32 (fabs.f32 alpha)) (fabs.f32 (fabs.f32 alpha)))
(*.f32 (exp.f32 (log.f32 alpha)) (exp.f32 (log.f32 alpha)))
(*.f32 (neg.f32 alpha) (neg.f32 alpha))
(*.f32 (fabs.f32 alpha) (fabs.f32 alpha))
(*.f32 alpha alpha)
(/.f32 #s(literal 1 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) alpha) #s(literal 2 binary32)))
(/.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))
(pow.f32 (exp.f32 #s(literal 2 binary32)) (log.f32 alpha))
(pow.f32 (exp.f32 (log.f32 alpha)) #s(literal 2 binary32))
(pow.f32 (neg.f32 alpha) #s(literal 2 binary32))
(pow.f32 (fabs.f32 alpha) #s(literal 2 binary32))
(pow.f32 (/.f32 #s(literal 1 binary32) alpha) #s(literal -2 binary32))
(pow.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(pow.f32 alpha #s(literal 2 binary32))
(fabs.f32 (*.f32 alpha alpha))
(+.f32 (cosh.f32 (log.f32 (*.f32 alpha alpha))) (sinh.f32 (log.f32 (*.f32 alpha alpha))))
(exp.f32 (log.f32 (*.f32 alpha alpha)))
alpha
#s(literal 1 binary32)
(log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))
(*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(fma.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) #s(literal 1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
(fma.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
(+.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) #s(literal 1 binary32))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
(+.f32 (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) #s(literal 1 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
(log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))
(log.f32 (pow.f32 (exp.f32 (PI.f32)) (log.f32 (*.f32 alpha alpha))))
(log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)))
(*.f32 (*.f32 #s(literal 2 binary32) (PI.f32)) (log.f32 alpha))
(*.f32 (*.f32 (log.f32 alpha) (PI.f32)) #s(literal 2 binary32))
(*.f32 (log.f32 (*.f32 alpha alpha)) (PI.f32))
(*.f32 #s(literal 2 binary32) (*.f32 (log.f32 alpha) (PI.f32)))
(*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)))
(fma.f32 (log.f32 alpha) (PI.f32) (*.f32 (log.f32 alpha) (PI.f32)))
(fma.f32 (PI.f32) (log.f32 alpha) (*.f32 (log.f32 alpha) (PI.f32)))
(+.f32 (*.f32 (log.f32 alpha) (PI.f32)) (*.f32 (log.f32 alpha) (PI.f32)))
(PI.f32)
(log.f32 (*.f32 alpha alpha))
(*.f32 #s(literal -2 binary32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))
(*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) #s(literal -2 binary32))
(*.f32 (log.f32 alpha) #s(literal 2 binary32))
(*.f32 #s(literal 2 binary32) (log.f32 alpha))
(fma.f32 #s(literal 1 binary32) (log.f32 alpha) (log.f32 alpha))
(+.f32 (log.f32 (neg.f32 alpha)) (log.f32 (neg.f32 alpha)))
(+.f32 (log.f32 (fabs.f32 alpha)) (log.f32 (fabs.f32 alpha)))
(+.f32 (log.f32 alpha) (log.f32 alpha))
(/.f32 (neg.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (neg.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
(/.f32 (neg.f32 (+.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 3 binary32)) (pow.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) #s(literal 3/2 binary32))))) (neg.f32 (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))))
(/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
(/.f32 (+.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 3 binary32)) (pow.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) #s(literal 3/2 binary32)))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
(-.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (/.f32 (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
(-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(-.f32 #s(literal 1 binary32) (*.f32 (neg.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta)) cosTheta))
(fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))
(fma.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 cosTheta cosTheta) #s(literal 1 binary32))
(fma.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta #s(literal 1 binary32))
(fma.f32 cosTheta (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) #s(literal 1 binary32))
(+.f32 (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))) (/.f32 (*.f32 (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 3 binary32)) (pow.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) #s(literal 3/2 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))))
(+.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) #s(literal 1 binary32))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
(*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 cosTheta cosTheta))
(*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)
(*.f32 cosTheta (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta))
(*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta)
(*.f32 cosTheta (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
cosTheta
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (fma.f32 (/.f32 (-.f32 (*.f32 (pow.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) #s(literal 3/2 binary32)) (*.f32 cosTheta cosTheta)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (*.f32 cosTheta cosTheta) (/.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (log.f32 (*.f32 alpha alpha)))) (/.f32 (/.f32 #s(literal 1 binary32) (PI.f32)) (log.f32 (*.f32 alpha alpha)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (-.f32 (*.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 (pow.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) #s(literal 2 binary32)) (*.f32 cosTheta cosTheta)) (pow.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) #s(literal 3/2 binary32))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))) (*.f32 cosTheta cosTheta)) (/.f32 (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha)))) (*.f32 cosTheta cosTheta) (/.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (fma.f32 (*.f32 #s(literal 2 binary32) (PI.f32)) (log.f32 alpha) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(literal 1 binary32))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
#s(approx (* (- (* alpha alpha) 1) cosTheta) (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta))
#s(approx cosTheta cosTheta)
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (/.f32 (/.f32 #s(literal 1 binary32) (PI.f32)) (log.f32 (*.f32 alpha alpha)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (/.f32 (/.f32 (/.f32 #s(literal 1 binary32) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (*.f32 cosTheta cosTheta)) (/.f32 (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 cosTheta cosTheta))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (+.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32))) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (/.f32 (/.f32 #s(literal 1 binary32) (PI.f32)) (log.f32 (*.f32 alpha alpha)))) (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (-.f32 (+.f32 (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32))) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (/.f32 (/.f32 #s(literal 1 binary32) (PI.f32)) (log.f32 (*.f32 alpha alpha)))) (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (/.f32 (/.f32 #s(literal -1 binary32) (*.f32 (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 3 binary32)) #s(literal -1 binary32))) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) #s(literal 3/2 binary32))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (*.f32 (fma.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (/.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (*.f32 cosTheta cosTheta))) (*.f32 cosTheta cosTheta)))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (*.f32 (-.f32 (fma.f32 alpha alpha (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 1 binary32)) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (/.f32 #s(literal -1/2 binary32) (PI.f32)) (log.f32 (pow.f32 alpha (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (-.f32 (fma.f32 (-.f32 (*.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) (-.f32 (/.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) (/.f32 (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) (/.f32 (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 alpha alpha) (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
#s(approx (- (* alpha alpha) 1) #s(literal -1 binary32))
#s(approx (- (* alpha alpha) 1) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
#s(approx (* alpha alpha) (*.f32 alpha alpha))
#s(approx alpha alpha)
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (*.f32 (*.f32 #s(literal 2 binary32) (PI.f32)) (log.f32 (pow.f32 alpha (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (fma.f32 (*.f32 #s(literal 2 binary32) (PI.f32)) (log.f32 (pow.f32 alpha (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 alpha alpha)) (log.f32 (pow.f32 alpha (*.f32 (*.f32 cosTheta cosTheta) (PI.f32)))))))
#s(approx (* (PI) (log (* alpha alpha))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))
#s(approx (log (* alpha alpha)) (log.f32 (*.f32 alpha alpha)))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (fma.f32 (*.f32 cosTheta cosTheta) (+.f32 #s(literal -1 binary32) (*.f32 alpha alpha)) #s(literal 1 binary32)))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) (*.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32)))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 #s(literal -1 binary32) (*.f32 alpha alpha))))
#s(approx (* (- (* alpha alpha) 1) cosTheta) (*.f32 #s(literal -1 binary32) cosTheta))
#s(approx (* (- (* alpha alpha) 1) cosTheta) (fma.f32 #s(literal -1 binary32) cosTheta (*.f32 (*.f32 alpha alpha) cosTheta)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32))) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (PI.f32))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 alpha alpha)) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (fma.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (PI.f32))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))) (/.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) (*.f32 (*.f32 (*.f32 (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32)) (PI.f32)) (*.f32 #s(literal -1 binary32) (log.f32 alpha))) (*.f32 alpha alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (*.f32 (-.f32 (/.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (PI.f32))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (*.f32 cosTheta cosTheta)) (/.f32 (/.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) (*.f32 (*.f32 (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32)) (PI.f32)) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (*.f32 cosTheta cosTheta))) (/.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha alpha) #s(literal 2 binary32)))) #s(literal -1 binary32) (-.f32 (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 alpha alpha)) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (fma.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (PI.f32))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))) (/.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) (*.f32 (*.f32 (*.f32 (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32)) (PI.f32)) (*.f32 #s(literal -1 binary32) (log.f32 alpha))) (*.f32 alpha alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (fma.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (PI.f32))) (*.f32 (-.f32 (/.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (PI.f32))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32))) (/.f32 (/.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) (*.f32 (*.f32 (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32)) (PI.f32)) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32)))) (/.f32 (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)) (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32))))) (fma.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32)))) (/.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (PI.f32))) (fma.f32 (-.f32 (/.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (PI.f32))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (*.f32 cosTheta cosTheta)) (/.f32 (/.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) (*.f32 (*.f32 (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32)) (PI.f32)) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (*.f32 cosTheta cosTheta))) (/.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha alpha) #s(literal 2 binary32))) (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (PI.f32))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))))
#s(approx (- (* alpha alpha) 1) (*.f32 alpha alpha))
#s(approx (- (* alpha alpha) 1) (*.f32 (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))) (*.f32 alpha alpha)))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (*.f32 (*.f32 #s(literal -2 binary32) (*.f32 alpha alpha)) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (*.f32 (*.f32 #s(literal -2 binary32) (fma.f32 (*.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (*.f32 (/.f32 (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (PI.f32)) alpha) (/.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) alpha)))) (*.f32 alpha alpha)))
#s(approx (* (PI) (log (* alpha alpha))) (*.f32 #s(literal -2 binary32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (PI.f32))))
#s(approx (log (* alpha alpha)) (log.f32 (*.f32 alpha alpha)))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (*.f32 (fma.f32 (/.f32 (*.f32 cosTheta cosTheta) alpha) (/.f32 #s(literal -1 binary32) alpha) (fma.f32 cosTheta cosTheta (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) (*.f32 alpha alpha)))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) (*.f32 (fma.f32 (/.f32 (*.f32 cosTheta cosTheta) alpha) (/.f32 #s(literal -1 binary32) alpha) (*.f32 cosTheta cosTheta)) (*.f32 alpha alpha)))
#s(approx (* (- (* alpha alpha) 1) cosTheta) (*.f32 (*.f32 alpha alpha) cosTheta))
#s(approx (* (- (* alpha alpha) 1) cosTheta) (*.f32 (fma.f32 (/.f32 cosTheta (*.f32 alpha alpha)) #s(literal -1 binary32) cosTheta) (*.f32 alpha alpha)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32))) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 alpha alpha)) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (log.f32 (/.f32 #s(literal -1 binary32) alpha)))) (fma.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 alpha alpha)) (/.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 (*.f32 (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32)) (PI.f32)) (log.f32 (/.f32 #s(literal -1 binary32) alpha)))) (*.f32 (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) #s(literal 1/2 binary32)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) (/.f32 (-.f32 (*.f32 (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) #s(literal 1/2 binary32)) (/.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) (*.f32 (*.f32 (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32)) (PI.f32)) (log.f32 (/.f32 #s(literal -1 binary32) alpha))))) (*.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 2 binary32)) (*.f32 cosTheta cosTheta)))) #s(literal -1 binary32) (-.f32 (/.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 alpha alpha)) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (log.f32 (/.f32 #s(literal -1 binary32) alpha)))) (fma.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 alpha alpha)) (/.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 (*.f32 (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32)) (PI.f32)) (log.f32 (/.f32 #s(literal -1 binary32) alpha)))) (*.f32 (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) #s(literal 1/2 binary32))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (fma.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) (*.f32 (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)) (/.f32 (-.f32 (*.f32 (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) #s(literal 1/2 binary32)) (/.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) (*.f32 (*.f32 (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32)) (PI.f32)) (log.f32 (/.f32 #s(literal -1 binary32) alpha))))) (*.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32)))))) (fma.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32)) (PI.f32)) (log.f32 (/.f32 #s(literal -1 binary32) alpha)))) (/.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) (*.f32 alpha alpha)) (fma.f32 (/.f32 #s(literal 1/2 binary32) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) (/.f32 (-.f32 (*.f32 (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) #s(literal 1/2 binary32)) (/.f32 (*.f32 #s(literal -1/2 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) (*.f32 (*.f32 (pow.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32)) (PI.f32)) (log.f32 (/.f32 #s(literal -1 binary32) alpha))))) (*.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 2 binary32)) (*.f32 cosTheta cosTheta))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (*.f32 (*.f32 #s(literal -2 binary32) (*.f32 alpha alpha)) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (log.f32 (/.f32 #s(literal -1 binary32) alpha)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (*.f32 (*.f32 #s(literal -2 binary32) (fma.f32 (*.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (/.f32 (*.f32 (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) (*.f32 alpha alpha)))) (*.f32 alpha alpha)))
#s(approx (* (PI) (log (* alpha alpha))) (log.f32 (pow.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)) #s(literal -2 binary32))))
#s(approx (log (* alpha alpha)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -2 binary32))))

eval29.0ms (0%)

Memory
-5.1MiB live, 48.6MiB allocated; 9ms collecting garbage
Compiler

Compiled 8 163 to 976 computations (88% saved)

prune30.0ms (0%)

Memory
7.9MiB live, 55.4MiB allocated; 1ms collecting garbage
Pruning

10 alts after pruning (10 fresh and 0 done)

PrunedKeptTotal
New21610226
Fresh000
Picked101
Done000
Total21710227
Accuracy
99.9%
Counts
227 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
98.6%
(/.f32 (/.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
98.3%
(/.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 2 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 alpha) (neg.f32 alpha) #s(literal 1 binary32))) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
▶82.7%
(/.f32 (-.f32 (+.f32 (cosh.f32 (log.f32 (*.f32 alpha alpha))) (sinh.f32 (log.f32 (*.f32 alpha alpha)))) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
98.2%
(/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) #s(literal 1 binary32))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))))
▶98.6%
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (+.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) #s(literal 1 binary32))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
▶98.4%
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
98.2%
(-.f32 (/.f32 (/.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))) (/.f32 (/.f32 (/.f32 #s(literal 1 binary32) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
▶98.1%
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
98.1%
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (PI.f32)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
▶98.2%
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
Compiler

Compiled 934 to 382 computations (59.1% saved)

series1.0s (1.1%)

Memory
-5.8MiB live, 696.8MiB allocated; 1.0s collecting garbage
Counts
74 → 449
Calls
Call 1
Inputs
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (+.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) #s(literal 1 binary32))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
(-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(*.f32 alpha alpha)
alpha
#s(literal 1 binary32)
(+.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) #s(literal 1 binary32))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
(log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) #s(literal 1 binary32)))
(pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) #s(literal 1 binary32))
(pow.f32 (*.f32 alpha alpha) (PI.f32))
(PI.f32)
(log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
(pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
(*.f32 cosTheta cosTheta)
cosTheta
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
(fma.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))
(fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))
(/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))
(*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))
(*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)))
(pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))
(*.f32 alpha cosTheta)
(-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))
(*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32)))
#s(literal 1/2 binary32)
(*.f32 (log.f32 alpha) (PI.f32))
(log.f32 alpha)
(/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))
(fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))
#s(literal -1 binary32)
(/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))
(*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta))
#s(literal -1/2 binary32)
(*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))
(pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))
#s(literal 2 binary32)
(*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))
(*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32)))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))
(+.f32 alpha #s(literal 1 binary32))
(log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))
(pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))
(pow.f32 alpha (PI.f32))
(/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(-.f32 alpha #s(literal 1 binary32))
(fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
(*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta)))
(*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)))
(log.f32 (*.f32 alpha alpha))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))
(*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta)
(*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta)
(/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
(-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32))
(pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32))
#s(literal 3 binary32)
(fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(neg.f32 (*.f32 alpha alpha))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
(*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(/.f32 (-.f32 (+.f32 (cosh.f32 (log.f32 (*.f32 alpha alpha))) (sinh.f32 (log.f32 (*.f32 alpha alpha)))) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
(-.f32 (+.f32 (cosh.f32 (log.f32 (*.f32 alpha alpha))) (sinh.f32 (log.f32 (*.f32 alpha alpha)))) #s(literal 1 binary32))
(+.f32 (cosh.f32 (log.f32 (*.f32 alpha alpha))) (sinh.f32 (log.f32 (*.f32 alpha alpha))))
(cosh.f32 (log.f32 (*.f32 alpha alpha)))
(sinh.f32 (log.f32 (*.f32 alpha alpha)))
(*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))
(*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)
(*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta)
Outputs
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (/ (- (pow alpha 2) 1) (log (pow (pow alpha 2) (PI))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2)) (log (pow (pow alpha 2) (PI))))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))) (/ 1 (log (pow (pow alpha 2) (PI)))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* -1 (* (pow cosTheta 2) (+ (* -1 (/ (pow (- (pow alpha 2) 1) 3) (log (pow (pow alpha 2) (PI))))) (* 1/24 (/ (* (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2)))))) (/ (pow (- (pow alpha 2) 1) 2) (log (pow (pow alpha 2) (PI)))))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))) (/ 1 (log (pow (pow alpha 2) (PI)))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (* (pow cosTheta 2) (+ (* -1 (* (+ (* -1 (/ (pow (- (pow alpha 2) 1) 3) (log (pow (pow alpha 2) (PI))))) (* 1/24 (/ (* (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2)))) (- (pow alpha 2) 1))) (+ (* -1/24 (/ (* (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (pow (- (pow alpha 2) 1) 2)) (pow (log (pow (pow alpha 2) (PI))) 2))) (* 1/720 (/ (* (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2))))))) (+ (* -1 (/ (pow (- (pow alpha 2) 1) 3) (log (pow (pow alpha 2) (PI))))) (* 1/24 (/ (* (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2)))))) (/ (pow (- (pow alpha 2) 1) 2) (log (pow (pow alpha 2) (PI)))))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))) (/ 1 (log (pow (pow alpha 2) (PI)))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (log (pow (pow alpha 2) (PI)))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (+ (* 1/24 (* (pow cosTheta 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (+ (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)) (* (pow cosTheta 2) (+ (* 1/720 (* (pow cosTheta 2) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))) (* 1/24 (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) #s(hole binary32 (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/24 (* (pow cosTheta 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) #s(hole binary32 (* (pow cosTheta 2) (+ (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)) (* (pow cosTheta 2) (+ (* 1/720 (* (pow cosTheta 2) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))) (* 1/24 (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) #s(hole binary32 (* (pow cosTheta 2) (+ (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)) (* (pow cosTheta 2) (+ (* 1/24 (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))) (* (pow cosTheta 2) (+ (* 1/40320 (* (pow cosTheta 2) (+ (* -10080 (* (pow (log (pow (pow alpha 2) (PI))) 4) (pow (- (pow alpha 2) 1) 4))) (+ (* -6720 (* (pow (log (pow (pow alpha 2) (PI))) 4) (pow (- (pow alpha 2) 1) 4))) (+ (* -5040 (* (pow (log (pow (pow alpha 2) (PI))) 4) (pow (- (pow alpha 2) 1) 4))) (+ (* 1680 (* (pow (log (pow (pow alpha 2) (PI))) 4) (pow (- (pow alpha 2) 1) 4))) (* 20160 (* (pow (log (pow (pow alpha 2) (PI))) 4) (pow (- (pow alpha 2) 1) 4))))))))) (* 1/720 (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 1))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (+ (* 1/2 (* (pow cosTheta 2) (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (+ (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)) (* (pow cosTheta 2) (+ (* 1/6 (* (pow cosTheta 2) (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3)))) (* 1/2 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))))))))
#s(approx (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) #s(hole binary32 (* (pow cosTheta 2) (- (pow alpha 2) 1))))
#s(approx (* cosTheta cosTheta) #s(hole binary32 (pow cosTheta 2)))
#s(approx cosTheta #s(hole binary32 cosTheta))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (PI) (log (pow alpha 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2)) (* (PI) (log (pow alpha 2))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 3)) (* (PI) (log (pow alpha 2)))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 4)) (* (PI) (log (pow alpha 2))))) (* -1 (/ (pow (- (pow alpha 2) 1) 3) (* (PI) (log (pow alpha 2))))))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (- (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (- (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (- (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (+ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (pow cosTheta 2) (- (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (- (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (+ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (pow cosTheta 2) (- (+ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (* (pow cosTheta 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (* (pow cosTheta 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (+ (* 3/2 (/ 1 (* (PI) (log alpha)))) (* (pow cosTheta 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))))))) (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* 1/2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (* 2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* 1/2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha)))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (+ (* 3/2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha)))) (/ (pow alpha 2) (* (PI) (log alpha)))))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha)))))) (/ (pow alpha 2) (* (PI) (log alpha)))))))))
#s(approx (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (pow (* alpha cosTheta) 1) #s(hole binary32 (* alpha cosTheta)))
#s(approx (* alpha cosTheta) #s(hole binary32 (* alpha cosTheta)))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* 3/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 1))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (+ 1 (pow cosTheta 2))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (+ 1 (pow cosTheta 2))))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (+ 1 (* (pow cosTheta 2) (+ 1 (pow cosTheta 2))))))))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(hole binary32 1))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* (pow cosTheta 2) (- (* -1 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -3/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (* -1/2 (* cosTheta cosTheta)) #s(hole binary32 (* -1/2 (pow cosTheta 2))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (PI) (log alpha))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (PI) (log alpha)))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (+ (* (PI) (log alpha)) (* (pow cosTheta 2) (+ (* -2 (* (PI) (log alpha))) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 1))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (+ 1 (* -2 (pow cosTheta 2)))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (pow cosTheta 2) 2)))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ -1/2 (* (PI) (log alpha)))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (- (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1 (* (PI) (log alpha)))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (/ 1 (* (PI) (log alpha))) (/ (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (/ 1 (* (PI) (log alpha))) (/ (pow cosTheta 2) (* (PI) (log alpha))))) (/ 1 (* (PI) (log alpha))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (/ 1 (* (PI) (log alpha))) (/ (pow cosTheta 2) (* (PI) (log alpha))))) (/ 1 (* (PI) (log alpha))))) (/ 1 (* (PI) (log alpha))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (* (+ 1 alpha) (- alpha 1)) (log (pow (pow alpha (PI)) 2)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1)))) (log (pow (pow alpha (PI)) 2)))) (/ (* (+ 1 alpha) (- alpha 1)) (log (pow (pow alpha (PI)) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2)))) (log (pow (pow alpha (PI)) 2))) (/ (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1))) (log (pow (pow alpha (PI)) 2))))) (/ (* (+ 1 alpha) (- alpha 1)) (log (pow (pow alpha (PI)) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 3)))) (log (pow (pow alpha (PI)) 2)))) (* -1 (/ (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2))) (log (pow (pow alpha (PI)) 2)))))) (/ (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1))) (log (pow (pow alpha (PI)) 2))))) (/ (* (+ 1 alpha) (- alpha 1)) (log (pow (pow alpha (PI)) 2))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- alpha 1)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ alpha (* -1 (* (pow cosTheta 2) (* (- alpha 1) (- (pow alpha 2) 1))))) 1)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ alpha (* (pow cosTheta 2) (- (* (pow cosTheta 2) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2))) (* (- alpha 1) (- (pow alpha 2) 1))))) 1)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ alpha (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (* (pow cosTheta 2) (* (- alpha 1) (pow (- (pow alpha 2) 1) 3)))) (* -1 (* (- alpha 1) (pow (- (pow alpha 2) 1) 2))))) (* (- alpha 1) (- (pow alpha 2) 1))))) 1)))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 1))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (PI) (log (pow alpha 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2)))) (/ (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 2) 1)) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2))))) (* -1 (/ (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2) (- (pow alpha 2) 1)) (* (PI) (log (pow alpha 2))))))) (/ (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 2) 1)) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (PI) (log (pow alpha 2)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* (PI) (log (pow alpha 2))) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 1))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (/ (* (pow cosTheta 2) (- (pow alpha 6) 1)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (/ (* cosTheta (- (pow alpha 6) 1)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (PI) (log (pow alpha 2))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (* (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2))))) (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (PI) (log (pow alpha 2))))) (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (PI) (log (pow alpha 2))))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (PI) (log (pow alpha 2))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (PI) (log (pow alpha 2))))) (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (pow (- (pow alpha 2) 1) 2))) (* (PI) (log (pow alpha 2)))) (/ (* (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (- (pow alpha 2) 1)) (* (PI) (log (pow alpha 2)))))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (PI) (log (pow alpha 2))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (PI) (log (pow alpha 2))))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (pow (- (pow alpha 2) 1) 3))) (* (PI) (log (pow alpha 2))))) (* -1 (/ (* (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (pow (- (pow alpha 2) 1) 2)) (* (PI) (log (pow alpha 2))))))) (/ (* (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (- (pow alpha 2) 1)) (* (PI) (log (pow alpha 2)))))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (PI) (log (pow alpha 2)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (+ (* (PI) (log (pow alpha 2))) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 1))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (* (pow cosTheta 2) (- (pow alpha 2) 1))))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (* cosTheta (- (pow alpha 2) 1))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (/ (- (pow alpha 2) 1) (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 (exp (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3))))))) (pow cosTheta 2))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 2)))) (pow cosTheta 2))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (+ (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (pow cosTheta 4)) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 2)))))) (pow cosTheta 2))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (/ 1/2 (* (pow cosTheta 6) (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (+ (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 6)) (+ (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (pow cosTheta 4)) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 2)))))))) (pow cosTheta 2))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (pow cosTheta 4))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 2))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))))) (pow cosTheta 4))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* -1 (/ (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (pow cosTheta 4))) (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 2))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha)))))))))) (pow cosTheta 4))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* -1 (/ (- (* -2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))) (pow cosTheta 6))) (+ (* -1 (/ (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (pow cosTheta 4))) (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 2))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (/ 2 (* (pow cosTheta 6) (* (PI) (log alpha))))))))))) (pow cosTheta 4))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha)))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (+ (* -1 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* 1/2 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 4))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (+ (* -3/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha))))) (+ (* -1 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 4))) (* 1/2 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))) (pow cosTheta 4))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (+ (* -2 (/ (pow alpha 2) (* (pow cosTheta 6) (* (PI) (log alpha))))) (+ (* -3/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha))))) (+ (* -1 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (+ (* -1 (/ (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (pow cosTheta 6))) (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 4))) (* 1/2 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))))) (pow cosTheta 4))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* 1/2 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 2))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (* 3/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha))))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (* 3/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha))))) (+ (* 2 (/ (pow alpha 2) (* (pow cosTheta 6) (* (PI) (log alpha))))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))) (pow cosTheta 2))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ 1/2 (* (pow cosTheta 4) (* (PI) (log alpha))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 4))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))) (/ 3/2 (* (pow cosTheta 4) (* (PI) (log alpha)))))) (pow cosTheta 4))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (* 2 (/ 1 (* (pow cosTheta 6) (* (PI) (log alpha)))))))) (pow cosTheta 4))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2)))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (pow cosTheta 2))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 4))) (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ -1 (pow cosTheta 2))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* -1 (/ (+ 1 (/ 1 (pow cosTheta 2))) (pow cosTheta 2)))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (* -1 (/ (+ 1 (/ 1 (pow cosTheta 2))) (pow cosTheta 2))) 1) (pow cosTheta 2))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (* -1 (/ (+ 1 (/ 1 (pow cosTheta 2))) (pow cosTheta 4))) (+ 1 (/ 1 (pow cosTheta 2)))) (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(hole binary32 (* -1 (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(hole binary32 (* (pow cosTheta 2) (- (/ 1 (pow cosTheta 2)) 1))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 2)))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (/ (- (* -1 (/ (+ (/ 1 (* (PI) (log alpha))) (* 3/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (pow cosTheta 2))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 4))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (pow cosTheta 4) (* (PI) (log alpha)))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (pow cosTheta 4) (+ (* -2 (/ (* (PI) (log alpha)) (pow cosTheta 2))) (* (PI) (log alpha))))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (pow cosTheta 4) (+ (* -2 (/ (* (PI) (log alpha)) (pow cosTheta 2))) (+ (* (PI) (log alpha)) (/ (* (PI) (log alpha)) (pow cosTheta 4)))))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (pow cosTheta 4)))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (* (pow cosTheta 4) (- 1 (* 2 (/ 1 (pow cosTheta 2)))))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (* (pow cosTheta 4) (- (+ 1 (/ 1 (pow cosTheta 4))) (* 2 (/ 1 (pow cosTheta 2)))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (/ 1/2 (* (pow cosTheta 4) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (pow cosTheta 6) (* (PI) (log alpha)))))))) (pow cosTheta 2))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ -1 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (* -1 (/ (+ (/ 1 (* (PI) (log alpha))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 2)))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ (- (* -1 (/ (+ (/ 1 (* (PI) (log alpha))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 2))) (/ 1 (* (PI) (log alpha)))) (pow cosTheta 2))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ (- (* -1 (/ (+ (/ 1 (* (PI) (log alpha))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 4))) (+ (/ 1 (* (PI) (log alpha))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (- (pow alpha 2) 1))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 2))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (log (pow (pow alpha (PI)) 2)) (- (pow alpha 2) 1)))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (/ (* (+ 1 alpha) (- alpha 1)) (* (log (pow (pow alpha (PI)) 2)) (- (pow alpha 2) 1))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 4) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 3))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 2))))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 6) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 4))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (log (pow (pow alpha (PI)) 2)) (- (pow alpha 2) 1)))) (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 4) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 3))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 2)))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- alpha 1) (* (pow cosTheta 2) (- (pow alpha 2) 1)))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))) (/ alpha (- (pow alpha 2) 1))) (+ (/ 1 (- (pow alpha 2) 1)) (/ alpha (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))) (+ (/ alpha (* (pow cosTheta 4) (pow (- (pow alpha 2) 1) 3))) (/ alpha (- (pow alpha 2) 1)))) (+ (/ 1 (* (pow cosTheta 4) (pow (- (pow alpha 2) 1) 3))) (+ (/ 1 (- (pow alpha 2) 1)) (/ alpha (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2)))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))) (+ (/ 1 (* (pow cosTheta 6) (pow (- (pow alpha 2) 1) 4))) (+ (/ alpha (* (pow cosTheta 4) (pow (- (pow alpha 2) 1) 3))) (/ alpha (- (pow alpha 2) 1))))) (+ (/ 1 (* (pow cosTheta 4) (pow (- (pow alpha 2) 1) 3))) (+ (/ 1 (- (pow alpha 2) 1)) (+ (/ alpha (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))) (/ alpha (* (pow cosTheta 6) (pow (- (pow alpha 2) 1) 4))))))) (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow cosTheta 2) (- (pow alpha 2) 1))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ 1 (pow cosTheta 2)) (pow alpha 2)) 1))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))) (/ (pow alpha 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))) (+ (/ (pow alpha 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (+ (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3))))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2)))))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))) (+ (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 4))))) (+ (/ (pow alpha 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3)))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (+ (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3))))) (+ (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))) (/ (pow alpha 2) (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 4))))))))) (pow cosTheta 2))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (+ (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))) (/ (* (PI) (log (pow alpha 2))) (pow cosTheta 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ 1 (pow cosTheta 2)) (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2))))))) (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (/ 1 (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))))) (pow cosTheta 2))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2))))))))) (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3))))))))) (pow cosTheta 2))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2))))) (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 4)))))))))) (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 4)))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 4)))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3))))))))))) (pow cosTheta 2))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (+ (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))) (/ (* (PI) (log (pow alpha 2))) (pow cosTheta 2))))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (pow alpha 2) 1))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ 1 (pow cosTheta 2)) (pow alpha 2)) 1))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (/ -1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (- (* (pow alpha 2) (- (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))) (* -2 (/ (* (pow cosTheta 2) (* (PI) (log alpha))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))))) (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (* (pow alpha 2) (+ (* -1/24 (/ (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))) (* 2 (/ (* (pow cosTheta 2) (* (PI) (* (log alpha) (- (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))) (* -2 (/ (* (pow cosTheta 2) (* (PI) (log alpha))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))))))) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))))))) (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))))) (* -2 (/ (* (pow cosTheta 2) (* (PI) (log alpha))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))))) (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -2 (/ (* (pow cosTheta 2) (* (PI) (* (log alpha) (+ (* -1/24 (/ (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))) (* 2 (/ (* (pow cosTheta 2) (* (PI) (* (log alpha) (- (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))) (* -2 (/ (* (pow cosTheta 2) (* (PI) (log alpha))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))))))) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))))))))) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))))) (+ (* -1/720 (/ (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))) (* 1/24 (/ (* (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (- (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))) (* -2 (/ (* (pow cosTheta 2) (* (PI) (log alpha))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))))) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))))))))) (+ (* -1/24 (/ (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))) (* 2 (/ (* (pow cosTheta 2) (* (PI) (* (log alpha) (- (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))) (* -2 (/ (* (pow cosTheta 2) (* (PI) (log alpha))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))))))) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))))))) (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))))) (* -2 (/ (* (pow cosTheta 2) (* (PI) (log alpha))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))))) (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))))))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 -1))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (- (pow alpha 2) 1)))
#s(approx (* alpha alpha) #s(hole binary32 (pow alpha 2)))
#s(approx alpha #s(hole binary32 alpha))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 2 (* (PI) (log alpha))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 2 (* (PI) (log alpha))) (* (pow alpha 2) (+ (* 1/24 (* (pow alpha 2) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 2 (* (PI) (log alpha))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 1/720 (* (pow alpha 2) (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) 1)) #s(hole binary32 (* 2 (* (PI) (log alpha)))))
#s(approx (pow (pow (* alpha alpha) (PI)) 1) #s(hole binary32 (exp (* 2 (* (PI) (log alpha))))))
#s(approx (pow (* alpha alpha) (PI)) #s(hole binary32 (exp (* 2 (* (PI) (log alpha))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) #s(hole binary32 (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) #s(hole binary32 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) #s(hole binary32 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 1/24 (* (pow alpha 2) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) #s(hole binary32 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 1/720 (* (pow alpha 2) (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 (+ (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (* (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (log alpha)))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 (+ (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow alpha 2) (+ (* 2 (* (pow alpha 2) (* (pow cosTheta 4) (* (pow (PI) 2) (* (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow (log alpha) 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (* (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (log alpha))))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 (+ (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (* (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (log alpha))))) (* (pow alpha 2) (+ (* 4/3 (* (pow alpha 2) (* (pow cosTheta 6) (* (pow (PI) 3) (* (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow (log alpha) 3)))))) (* 2 (* (pow cosTheta 4) (* (pow (PI) 2) (* (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow (log alpha) 2))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) #s(hole binary32 (* -1 (pow cosTheta 2))))
#s(approx (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (* (log alpha) (PI)) #s(hole binary32 (* (PI) (log alpha))))
#s(approx (log alpha) #s(hole binary32 (log alpha)))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ 1 (* (log alpha) (PI))) #s(hole binary32 (/ 1 (* (PI) (log alpha)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ -1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* (pow alpha 2) (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2)))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* (pow alpha 2) (- (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (* (pow cosTheta 2) (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (+ 1 (* -1 (pow cosTheta 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2)))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (/ 1 (log (pow (pow alpha (PI)) 2)))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (+ (/ 1 (log (pow (pow alpha (PI)) 2))) (/ alpha (log (pow (pow alpha (PI)) 2))))))
#s(approx (+ alpha 1) #s(hole binary32 1))
#s(approx (+ alpha 1) #s(hole binary32 (+ 1 alpha)))
#s(approx (log (pow (pow alpha (PI)) 2)) #s(hole binary32 (log (pow (pow alpha (PI)) 2))))
#s(approx (pow (pow alpha (PI)) 2) #s(hole binary32 (pow (pow alpha (PI)) 2)))
#s(approx (pow alpha (PI)) #s(hole binary32 (pow alpha (PI))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ -1 (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (/ alpha (+ 1 (* -1 (pow cosTheta 2)))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* alpha (+ (/ 1 (+ 1 (* -1 (pow cosTheta 2)))) (/ (* alpha (pow cosTheta 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* alpha (+ (* alpha (- (* -1 (/ (* alpha (pow cosTheta 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (pow cosTheta 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (- alpha 1) #s(hole binary32 -1))
#s(approx (- alpha 1) #s(hole binary32 (- alpha 1)))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (* (pow alpha 2) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1 (/ (* (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))) (+ (* -1 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2)))))) (+ 1 (* -1 (pow cosTheta 2))))) (* -1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* -2 (* (pow alpha 2) (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* -2 (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))))) (* 2 (* (pow alpha 2) (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))))))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* 2 (* (PI) (log alpha)))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* 2 (log alpha))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* -1 (pow cosTheta 2))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2)))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2)))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* -1 cosTheta)))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) cosTheta))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ cosTheta (* -1 cosTheta)))) (* -1 cosTheta))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ cosTheta (* -1 cosTheta))) (+ cosTheta (* -1 cosTheta)))) (* -1 cosTheta))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 -1))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (- (pow alpha 2) 1)))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 -1))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (- (pow alpha 6) 1)))
#s(approx (pow (* alpha alpha) 3) #s(hole binary32 (pow alpha 6)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 1))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (+ 1 (pow alpha 2))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (+ 1 (* (pow alpha 2) (+ 1 (pow alpha 2))))))
#s(approx (neg (* alpha alpha)) #s(hole binary32 (* -1 (pow alpha 2))))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(hole binary32 1))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(hole binary32 (+ 1 (pow alpha 2))))
#s(approx (* (* alpha alpha) 1) #s(hole binary32 (pow alpha 2)))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (* 1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (+ (* 1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (* 1/2 (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 1/2 (/ (* (pow cosTheta 2) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (+ (* 1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (* (pow alpha 2) (- (* -1/2 (/ (* (pow alpha 2) (* (pow cosTheta 6) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 4))))) (* -1/2 (/ (* (pow cosTheta 4) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))) (* 1/2 (/ (* (pow cosTheta 2) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) #s(hole binary32 (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)))
#s(approx (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) #s(hole binary32 (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2)))))))
#s(approx (cosh (log (* alpha alpha))) #s(hole binary32 (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2)))))
#s(approx (sinh (log (* alpha alpha))) #s(hole binary32 (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2))))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (* -1 (pow cosTheta 2))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2)))))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (* -1 cosTheta)))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) cosTheta))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (/ (pow alpha 2) (+ (* -2 (* (PI) (log (/ 1 alpha)))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (* (pow alpha 2) (- (/ 1 (+ (* -2 (* (PI) (log (/ 1 alpha)))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))) (/ 1 (* (pow alpha 2) (+ (* -2 (* (PI) (log (/ 1 alpha)))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))))))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (pow alpha 2)))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (* (pow alpha 2) (- 1 (/ 1 (pow alpha 2))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (* -2 (* (PI) (log (/ 1 alpha)))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) 1)) #s(hole binary32 (* -2 (* (PI) (log (/ 1 alpha))))))
#s(approx (pow (pow (* alpha alpha) (PI)) 1) #s(hole binary32 (exp (* -2 (* (PI) (log (/ 1 alpha)))))))
#s(approx (pow (* alpha alpha) (PI)) #s(hole binary32 (exp (* -2 (* (PI) (log (/ 1 alpha)))))))
#s(approx (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (pow cosTheta 2)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* (pow alpha 4) (+ (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (pow alpha 2))) (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1/2 (* (pow alpha 4) (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))) (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (+ (* 1/2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1/2 (* (pow alpha 2) (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (pow alpha 2))) (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* -1 (* (pow alpha 2) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (* -1 (+ (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ -1/2 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) #s(hole binary32 (/ -1/2 (* (PI) (log (/ 1 alpha))))))
#s(approx (* (log alpha) (PI)) #s(hole binary32 (* -1 (* (PI) (log (/ 1 alpha))))))
#s(approx (log alpha) #s(hole binary32 (* -1 (log (/ 1 alpha)))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* -1 (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ 1/2 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ -1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ 1 (* (log alpha) (PI))) #s(hole binary32 (/ -1 (* (PI) (log (/ 1 alpha))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))) (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (/ 1 (* (pow alpha 4) (* (pow cosTheta 6) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (+ (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (/ 1 (* (pow alpha 4) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (* -1 (/ (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (* (pow alpha 6) (* (pow cosTheta 8) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (+ (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 4) (* (pow cosTheta 6) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))) (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (/ alpha (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (* alpha (+ (/ 1 (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))) (/ 1 (* alpha (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))))
#s(approx (+ alpha 1) #s(hole binary32 alpha))
#s(approx (+ alpha 1) #s(hole binary32 (* alpha (+ 1 (/ 1 alpha)))))
#s(approx (log (pow (pow alpha (PI)) 2)) #s(hole binary32 (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))
#s(approx (pow (pow alpha (PI)) 2) #s(hole binary32 (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))
#s(approx (pow alpha (PI)) #s(hole binary32 (exp (* -1 (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ 1 (* alpha (pow cosTheta 2)))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (/ 1 (pow cosTheta 2)) (/ 1 (* alpha (pow cosTheta 2)))) alpha)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow alpha 2) (pow cosTheta 2))) (/ 1 (pow cosTheta 2))) (+ (/ 1 (* alpha (pow cosTheta 2))) (/ 1 (* (pow alpha 2) (pow cosTheta 4))))) alpha)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow alpha 2) (pow cosTheta 2))) (+ (/ 1 (* (pow alpha 3) (pow cosTheta 4))) (/ 1 (pow cosTheta 2)))) (+ (/ 1 (* alpha (pow cosTheta 2))) (+ (/ 1 (* (pow alpha 2) (pow cosTheta 4))) (/ 1 (* (pow alpha 3) (pow cosTheta 2)))))) alpha)))
#s(approx (- alpha 1) #s(hole binary32 alpha))
#s(approx (- alpha 1) #s(hole binary32 (* alpha (- 1 (/ 1 alpha)))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (+ (/ 1 (pow alpha 2)) (pow cosTheta 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow cosTheta 2))) (pow alpha 4))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* -1 (/ (* (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow cosTheta 2))) (+ (* -1 (/ (* (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow cosTheta 2))) (- 1 (pow cosTheta 2))) (pow cosTheta 2))) (* -1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow alpha 6))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow alpha 4) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 6))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4)))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* -2 (* (PI) (log (/ 1 alpha))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* -2 (log (/ 1 alpha)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (/ 1 (pow alpha 2)) (pow cosTheta 2)) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (pow alpha 4))) (+ (/ 1 (pow alpha 2)) (pow cosTheta 2))) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (pow cosTheta 2) (pow alpha 6))) (+ (/ 1 (pow alpha 2)) (+ (/ (pow cosTheta 2) (pow alpha 6)) (pow cosTheta 2)))) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 4))) (+ (/ (pow cosTheta 2) (pow alpha 2)) (/ (pow cosTheta 2) (pow alpha 4))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (pow cosTheta 2)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (pow alpha 4))) (pow cosTheta 2)) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (pow cosTheta 2) (pow alpha 6))) (+ (/ (pow cosTheta 2) (pow alpha 6)) (pow cosTheta 2))) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 4))) (+ (/ (pow cosTheta 2) (pow alpha 2)) (/ (pow cosTheta 2) (pow alpha 4))))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) cosTheta)))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ cosTheta (* -1 (/ cosTheta (pow alpha 2)))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ cosTheta (* -1 (/ (+ cosTheta (* -1 cosTheta)) (pow alpha 4)))) (/ cosTheta (pow alpha 2))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ cosTheta (+ (* -1 (/ cosTheta (pow alpha 6))) (/ cosTheta (pow alpha 6)))) (+ (* -1 (/ cosTheta (pow alpha 4))) (+ (/ cosTheta (pow alpha 2)) (/ cosTheta (pow alpha 4))))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (pow alpha 2)))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (* (pow alpha 2) (- 1 (/ 1 (pow alpha 2))))))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (pow alpha 6)))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (* (pow alpha 6) (- 1 (/ 1 (pow alpha 6))))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (pow alpha 4)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (* (pow alpha 4) (+ 1 (/ 1 (pow alpha 2))))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (* (pow alpha 4) (+ 1 (+ (/ 1 (pow alpha 2)) (/ 1 (pow alpha 4)))))))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(hole binary32 (pow alpha 2)))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(hole binary32 (* (pow alpha 2) (+ 1 (/ 1 (pow alpha 2))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (* -1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (+ (* -1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* 1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow alpha 2))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* -1/2 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 4) (* (pow cosTheta 6) (* (PI) (log (/ 1 alpha))))))) (* -1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (* -1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow alpha 2))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* -1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* 1/2 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 6) (* (pow cosTheta 8) (* (PI) (log (/ 1 alpha)))))))) (+ (* -1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 4) (* (pow cosTheta 6) (* (PI) (log (/ 1 alpha))))))))) (pow alpha 2))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))) (pow alpha 2)))))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (+ (/ 1 (pow alpha 2)) (pow cosTheta 2))))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (pow cosTheta 2)))))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (* (pow alpha 2) cosTheta)))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ cosTheta (* -1 (/ cosTheta (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (/ (pow alpha 2) (+ (* -2 (* (PI) (log (/ -1 alpha)))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (* (pow alpha 2) (- (/ 1 (+ (* -2 (* (PI) (log (/ -1 alpha)))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))) (/ 1 (* (pow alpha 2) (+ (* -2 (* (PI) (log (/ -1 alpha)))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (* -2 (* (PI) (log (/ -1 alpha)))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) 1)) #s(hole binary32 (* -2 (* (PI) (log (/ -1 alpha))))))
#s(approx (pow (pow (* alpha alpha) (PI)) 1) #s(hole binary32 (exp (* -2 (* (PI) (log (/ -1 alpha)))))))
#s(approx (pow (* alpha alpha) (PI)) #s(hole binary32 (exp (* -2 (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* -1 (/ (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ 1/2 (* (pow alpha 2) (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* -1/2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ 1/2 (* (pow alpha 2) (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (* -1/2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (/ 1/2 (* (pow alpha 4) (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ 1/2 (* (pow alpha 2) (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* -1/2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1/2 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) #s(hole binary32 (/ 1/2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (* (log alpha) (PI)) #s(hole binary32 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))
#s(approx (log alpha) #s(hole binary32 (+ (log -1) (* -1 (log (/ -1 alpha))))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ -1/2 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ 1 (* (log alpha) (PI))) #s(hole binary32 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (pow alpha 2))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (pow alpha 2))) (+ (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))) (* (pow alpha 4) (pow cosTheta 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1 (/ (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (pow alpha 2))) (+ (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (/ alpha (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (* alpha (+ (/ 1 (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))) (/ 1 (* alpha (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))))
#s(approx (log (pow (pow alpha (PI)) 2)) #s(hole binary32 (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))
#s(approx (pow (pow alpha (PI)) 2) #s(hole binary32 (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))
#s(approx (pow alpha (PI)) #s(hole binary32 (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (/ 1 (* alpha (pow cosTheta 2))) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (/ 1 (* alpha (pow cosTheta 2))) (+ (/ 1 (* alpha (pow cosTheta 4))) (/ 1 (pow cosTheta 2)))) alpha)) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (- (/ 1 (pow cosTheta 2)) (/ 1 (pow cosTheta 4)))) (/ 1 (* alpha (pow cosTheta 2)))) (/ 1 (* alpha (pow cosTheta 4)))) alpha)) (/ 1 (pow cosTheta 2))) alpha)) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (- alpha 1) #s(hole binary32 (* -1 (* alpha (- (/ 1 alpha) 1)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow cosTheta 2))) (pow alpha 4))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* -1 (/ (* (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow cosTheta 2))) (+ (* -1 (/ (* (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow cosTheta 2))) (- 1 (pow cosTheta 2))) (pow cosTheta 2))) (* -1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow alpha 6))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow alpha 4) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 6))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4)))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* -2 (* (PI) (log (/ -1 alpha))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* -2 (log (/ -1 alpha)))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (* -1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (+ (* -1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* 1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow alpha 2))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* -1/2 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 4) (* (pow cosTheta 6) (* (PI) (log (/ -1 alpha))))))) (* -1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (* -1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow alpha 2))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* -1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* 1/2 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 6) (* (pow cosTheta 8) (* (PI) (log (/ -1 alpha)))))))) (+ (* -1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 4) (* (pow cosTheta 6) (* (PI) (log (/ -1 alpha))))))))) (pow alpha 2))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))) (pow alpha 2)))))))
Calls

6 calls:

TimeVariablePointExpression
571.0ms
alpha
@0
((/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (- (* alpha alpha) 1) (* alpha alpha) alpha 1 (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) (log (pow (pow (* alpha alpha) (PI)) 1)) (pow (pow (* alpha alpha) (PI)) 1) (pow (* alpha alpha) (PI)) (PI) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) (* cosTheta cosTheta) cosTheta (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (pow (* alpha cosTheta) 1) (* alpha cosTheta) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1/2 (* (log alpha) (PI))) 1/2 (* (log alpha) (PI)) (log alpha) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (+ (* (* cosTheta cosTheta) -1) 1) -1 (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (* -1/2 (* cosTheta cosTheta)) -1/2 (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) 2 (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1 (* (log alpha) (PI))) (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (+ alpha 1) (log (pow (pow alpha (PI)) 2)) (pow (pow alpha (PI)) 2) (pow alpha (PI)) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (log (* alpha alpha)) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (- (pow (* alpha alpha) 3) 1) (pow (* alpha alpha) 3) 3 (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (neg (* alpha alpha)) (+ 1 (* (* alpha alpha) 1)) (* (* alpha alpha) 1) (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) (* (- (* alpha alpha) 1) cosTheta))
156.0ms
alpha
@inf
((/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (- (* alpha alpha) 1) (* alpha alpha) alpha 1 (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) (log (pow (pow (* alpha alpha) (PI)) 1)) (pow (pow (* alpha alpha) (PI)) 1) (pow (* alpha alpha) (PI)) (PI) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) (* cosTheta cosTheta) cosTheta (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (pow (* alpha cosTheta) 1) (* alpha cosTheta) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1/2 (* (log alpha) (PI))) 1/2 (* (log alpha) (PI)) (log alpha) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (+ (* (* cosTheta cosTheta) -1) 1) -1 (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (* -1/2 (* cosTheta cosTheta)) -1/2 (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) 2 (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1 (* (log alpha) (PI))) (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (+ alpha 1) (log (pow (pow alpha (PI)) 2)) (pow (pow alpha (PI)) 2) (pow alpha (PI)) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (log (* alpha alpha)) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (- (pow (* alpha alpha) 3) 1) (pow (* alpha alpha) 3) 3 (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (neg (* alpha alpha)) (+ 1 (* (* alpha alpha) 1)) (* (* alpha alpha) 1) (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) (* (- (* alpha alpha) 1) cosTheta))
109.0ms
cosTheta
@inf
((/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (- (* alpha alpha) 1) (* alpha alpha) alpha 1 (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) (log (pow (pow (* alpha alpha) (PI)) 1)) (pow (pow (* alpha alpha) (PI)) 1) (pow (* alpha alpha) (PI)) (PI) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) (* cosTheta cosTheta) cosTheta (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (pow (* alpha cosTheta) 1) (* alpha cosTheta) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1/2 (* (log alpha) (PI))) 1/2 (* (log alpha) (PI)) (log alpha) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (+ (* (* cosTheta cosTheta) -1) 1) -1 (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (* -1/2 (* cosTheta cosTheta)) -1/2 (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) 2 (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1 (* (log alpha) (PI))) (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (+ alpha 1) (log (pow (pow alpha (PI)) 2)) (pow (pow alpha (PI)) 2) (pow alpha (PI)) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (log (* alpha alpha)) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (- (pow (* alpha alpha) 3) 1) (pow (* alpha alpha) 3) 3 (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (neg (* alpha alpha)) (+ 1 (* (* alpha alpha) 1)) (* (* alpha alpha) 1) (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) (* (- (* alpha alpha) 1) cosTheta))
80.0ms
alpha
@-inf
((/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (- (* alpha alpha) 1) (* alpha alpha) alpha 1 (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) (log (pow (pow (* alpha alpha) (PI)) 1)) (pow (pow (* alpha alpha) (PI)) 1) (pow (* alpha alpha) (PI)) (PI) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) (* cosTheta cosTheta) cosTheta (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (pow (* alpha cosTheta) 1) (* alpha cosTheta) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1/2 (* (log alpha) (PI))) 1/2 (* (log alpha) (PI)) (log alpha) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (+ (* (* cosTheta cosTheta) -1) 1) -1 (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (* -1/2 (* cosTheta cosTheta)) -1/2 (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) 2 (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1 (* (log alpha) (PI))) (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (+ alpha 1) (log (pow (pow alpha (PI)) 2)) (pow (pow alpha (PI)) 2) (pow alpha (PI)) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (log (* alpha alpha)) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (- (pow (* alpha alpha) 3) 1) (pow (* alpha alpha) 3) 3 (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (neg (* alpha alpha)) (+ 1 (* (* alpha alpha) 1)) (* (* alpha alpha) 1) (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) (* (- (* alpha alpha) 1) cosTheta))
37.0ms
cosTheta
@-inf
((/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (- (* alpha alpha) 1) (* alpha alpha) alpha 1 (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) (log (pow (pow (* alpha alpha) (PI)) 1)) (pow (pow (* alpha alpha) (PI)) 1) (pow (* alpha alpha) (PI)) (PI) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) (* cosTheta cosTheta) cosTheta (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (pow (* alpha cosTheta) 1) (* alpha cosTheta) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1/2 (* (log alpha) (PI))) 1/2 (* (log alpha) (PI)) (log alpha) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (+ (* (* cosTheta cosTheta) -1) 1) -1 (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (* -1/2 (* cosTheta cosTheta)) -1/2 (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) 2 (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1 (* (log alpha) (PI))) (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (+ alpha 1) (log (pow (pow alpha (PI)) 2)) (pow (pow alpha (PI)) 2) (pow alpha (PI)) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (log (* alpha alpha)) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (- (pow (* alpha alpha) 3) 1) (pow (* alpha alpha) 3) 3 (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (neg (* alpha alpha)) (+ 1 (* (* alpha alpha) 1)) (* (* alpha alpha) 1) (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) (* (- (* alpha alpha) 1) cosTheta))

rewrite305.0ms (0.3%)

Memory
-17.6MiB live, 301.9MiB allocated; 104ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0222633506
0238630188
0857529636
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
523 → 653
Calls
Call 1
Inputs
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (+.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) #s(literal 1 binary32))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
(-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(*.f32 alpha alpha)
alpha
#s(literal 1 binary32)
(+.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) #s(literal 1 binary32))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
(log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) #s(literal 1 binary32)))
(pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) #s(literal 1 binary32))
(pow.f32 (*.f32 alpha alpha) (PI.f32))
(PI.f32)
(log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
(pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
(*.f32 cosTheta cosTheta)
cosTheta
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
(fma.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))
(fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))
(/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))
(*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))
(*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)))
(pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))
(*.f32 alpha cosTheta)
(-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))
(*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32)))
#s(literal 1/2 binary32)
(*.f32 (log.f32 alpha) (PI.f32))
(log.f32 alpha)
(/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))
(fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))
#s(literal -1 binary32)
(/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))
(*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta))
#s(literal -1/2 binary32)
(*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))
(pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))
#s(literal 2 binary32)
(*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))
(*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32)))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))
(+.f32 alpha #s(literal 1 binary32))
(log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))
(pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))
(pow.f32 alpha (PI.f32))
(/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(-.f32 alpha #s(literal 1 binary32))
(fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
(*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta)))
(*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)))
(log.f32 (*.f32 alpha alpha))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))
(*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta)
(*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta)
(/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
(-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32))
(pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32))
#s(literal 3 binary32)
(fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(neg.f32 (*.f32 alpha alpha))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
(*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(/.f32 (-.f32 (+.f32 (cosh.f32 (log.f32 (*.f32 alpha alpha))) (sinh.f32 (log.f32 (*.f32 alpha alpha)))) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
(-.f32 (+.f32 (cosh.f32 (log.f32 (*.f32 alpha alpha))) (sinh.f32 (log.f32 (*.f32 alpha alpha)))) #s(literal 1 binary32))
(+.f32 (cosh.f32 (log.f32 (*.f32 alpha alpha))) (sinh.f32 (log.f32 (*.f32 alpha alpha))))
(cosh.f32 (log.f32 (*.f32 alpha alpha)))
(sinh.f32 (log.f32 (*.f32 alpha alpha)))
(*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))
(*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)
(*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta)
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (/ (- (pow alpha 2) 1) (log (pow (pow alpha 2) (PI))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2)) (log (pow (pow alpha 2) (PI))))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))) (/ 1 (log (pow (pow alpha 2) (PI)))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* -1 (* (pow cosTheta 2) (+ (* -1 (/ (pow (- (pow alpha 2) 1) 3) (log (pow (pow alpha 2) (PI))))) (* 1/24 (/ (* (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2)))))) (/ (pow (- (pow alpha 2) 1) 2) (log (pow (pow alpha 2) (PI)))))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))) (/ 1 (log (pow (pow alpha 2) (PI)))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (* (pow cosTheta 2) (+ (* -1 (* (+ (* -1 (/ (pow (- (pow alpha 2) 1) 3) (log (pow (pow alpha 2) (PI))))) (* 1/24 (/ (* (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2)))) (- (pow alpha 2) 1))) (+ (* -1/24 (/ (* (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (pow (- (pow alpha 2) 1) 2)) (pow (log (pow (pow alpha 2) (PI))) 2))) (* 1/720 (/ (* (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2))))))) (+ (* -1 (/ (pow (- (pow alpha 2) 1) 3) (log (pow (pow alpha 2) (PI))))) (* 1/24 (/ (* (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2)))))) (/ (pow (- (pow alpha 2) 1) 2) (log (pow (pow alpha 2) (PI)))))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))) (/ 1 (log (pow (pow alpha 2) (PI)))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (log (pow (pow alpha 2) (PI)))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (+ (* 1/24 (* (pow cosTheta 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (+ (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)) (* (pow cosTheta 2) (+ (* 1/720 (* (pow cosTheta 2) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))) (* 1/24 (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) #s(hole binary32 (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/24 (* (pow cosTheta 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) #s(hole binary32 (* (pow cosTheta 2) (+ (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)) (* (pow cosTheta 2) (+ (* 1/720 (* (pow cosTheta 2) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))) (* 1/24 (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) #s(hole binary32 (* (pow cosTheta 2) (+ (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)) (* (pow cosTheta 2) (+ (* 1/24 (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))) (* (pow cosTheta 2) (+ (* 1/40320 (* (pow cosTheta 2) (+ (* -10080 (* (pow (log (pow (pow alpha 2) (PI))) 4) (pow (- (pow alpha 2) 1) 4))) (+ (* -6720 (* (pow (log (pow (pow alpha 2) (PI))) 4) (pow (- (pow alpha 2) 1) 4))) (+ (* -5040 (* (pow (log (pow (pow alpha 2) (PI))) 4) (pow (- (pow alpha 2) 1) 4))) (+ (* 1680 (* (pow (log (pow (pow alpha 2) (PI))) 4) (pow (- (pow alpha 2) 1) 4))) (* 20160 (* (pow (log (pow (pow alpha 2) (PI))) 4) (pow (- (pow alpha 2) 1) 4))))))))) (* 1/720 (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 1))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (+ (* 1/2 (* (pow cosTheta 2) (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (+ (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)) (* (pow cosTheta 2) (+ (* 1/6 (* (pow cosTheta 2) (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3)))) (* 1/2 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))))))))
#s(approx (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) #s(hole binary32 (* (pow cosTheta 2) (- (pow alpha 2) 1))))
#s(approx (* cosTheta cosTheta) #s(hole binary32 (pow cosTheta 2)))
#s(approx cosTheta #s(hole binary32 cosTheta))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (PI) (log (pow alpha 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2)) (* (PI) (log (pow alpha 2))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 3)) (* (PI) (log (pow alpha 2)))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 4)) (* (PI) (log (pow alpha 2))))) (* -1 (/ (pow (- (pow alpha 2) 1) 3) (* (PI) (log (pow alpha 2))))))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (- (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (- (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (- (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (+ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (pow cosTheta 2) (- (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (- (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (+ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (pow cosTheta 2) (- (+ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (* (pow cosTheta 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (* (pow cosTheta 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (+ (* 3/2 (/ 1 (* (PI) (log alpha)))) (* (pow cosTheta 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))))))) (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* 1/2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (* 2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* 1/2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha)))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (+ (* 3/2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha)))) (/ (pow alpha 2) (* (PI) (log alpha)))))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha)))))) (/ (pow alpha 2) (* (PI) (log alpha)))))))))
#s(approx (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (pow (* alpha cosTheta) 1) #s(hole binary32 (* alpha cosTheta)))
#s(approx (* alpha cosTheta) #s(hole binary32 (* alpha cosTheta)))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* 3/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 1))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (+ 1 (pow cosTheta 2))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (+ 1 (pow cosTheta 2))))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (+ 1 (* (pow cosTheta 2) (+ 1 (pow cosTheta 2))))))))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(hole binary32 1))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* (pow cosTheta 2) (- (* -1 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -3/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (* -1/2 (* cosTheta cosTheta)) #s(hole binary32 (* -1/2 (pow cosTheta 2))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (PI) (log alpha))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (PI) (log alpha)))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (+ (* (PI) (log alpha)) (* (pow cosTheta 2) (+ (* -2 (* (PI) (log alpha))) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 1))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (+ 1 (* -2 (pow cosTheta 2)))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (pow cosTheta 2) 2)))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ -1/2 (* (PI) (log alpha)))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (- (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1 (* (PI) (log alpha)))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (/ 1 (* (PI) (log alpha))) (/ (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (/ 1 (* (PI) (log alpha))) (/ (pow cosTheta 2) (* (PI) (log alpha))))) (/ 1 (* (PI) (log alpha))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (/ 1 (* (PI) (log alpha))) (/ (pow cosTheta 2) (* (PI) (log alpha))))) (/ 1 (* (PI) (log alpha))))) (/ 1 (* (PI) (log alpha))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (* (+ 1 alpha) (- alpha 1)) (log (pow (pow alpha (PI)) 2)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1)))) (log (pow (pow alpha (PI)) 2)))) (/ (* (+ 1 alpha) (- alpha 1)) (log (pow (pow alpha (PI)) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2)))) (log (pow (pow alpha (PI)) 2))) (/ (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1))) (log (pow (pow alpha (PI)) 2))))) (/ (* (+ 1 alpha) (- alpha 1)) (log (pow (pow alpha (PI)) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 3)))) (log (pow (pow alpha (PI)) 2)))) (* -1 (/ (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2))) (log (pow (pow alpha (PI)) 2)))))) (/ (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1))) (log (pow (pow alpha (PI)) 2))))) (/ (* (+ 1 alpha) (- alpha 1)) (log (pow (pow alpha (PI)) 2))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- alpha 1)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ alpha (* -1 (* (pow cosTheta 2) (* (- alpha 1) (- (pow alpha 2) 1))))) 1)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ alpha (* (pow cosTheta 2) (- (* (pow cosTheta 2) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2))) (* (- alpha 1) (- (pow alpha 2) 1))))) 1)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ alpha (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (* (pow cosTheta 2) (* (- alpha 1) (pow (- (pow alpha 2) 1) 3)))) (* -1 (* (- alpha 1) (pow (- (pow alpha 2) 1) 2))))) (* (- alpha 1) (- (pow alpha 2) 1))))) 1)))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 1))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (PI) (log (pow alpha 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2)))) (/ (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 2) 1)) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2))))) (* -1 (/ (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2) (- (pow alpha 2) 1)) (* (PI) (log (pow alpha 2))))))) (/ (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 2) 1)) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (PI) (log (pow alpha 2)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* (PI) (log (pow alpha 2))) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 1))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (/ (* (pow cosTheta 2) (- (pow alpha 6) 1)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (/ (* cosTheta (- (pow alpha 6) 1)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (PI) (log (pow alpha 2))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (* (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2))))) (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (PI) (log (pow alpha 2))))) (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (PI) (log (pow alpha 2))))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (PI) (log (pow alpha 2))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (PI) (log (pow alpha 2))))) (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (pow (- (pow alpha 2) 1) 2))) (* (PI) (log (pow alpha 2)))) (/ (* (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (- (pow alpha 2) 1)) (* (PI) (log (pow alpha 2)))))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (PI) (log (pow alpha 2))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (PI) (log (pow alpha 2))))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (pow (- (pow alpha 2) 1) 3))) (* (PI) (log (pow alpha 2))))) (* -1 (/ (* (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (pow (- (pow alpha 2) 1) 2)) (* (PI) (log (pow alpha 2))))))) (/ (* (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (- (pow alpha 2) 1)) (* (PI) (log (pow alpha 2)))))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (PI) (log (pow alpha 2)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (+ (* (PI) (log (pow alpha 2))) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 1))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (* (pow cosTheta 2) (- (pow alpha 2) 1))))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (* cosTheta (- (pow alpha 2) 1))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (/ (- (pow alpha 2) 1) (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 (exp (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3))))))) (pow cosTheta 2))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 2)))) (pow cosTheta 2))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (+ (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (pow cosTheta 4)) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 2)))))) (pow cosTheta 2))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (/ 1/2 (* (pow cosTheta 6) (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (+ (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 6)) (+ (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (pow cosTheta 4)) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 2)))))))) (pow cosTheta 2))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (pow cosTheta 4))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 2))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))))) (pow cosTheta 4))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* -1 (/ (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (pow cosTheta 4))) (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 2))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha)))))))))) (pow cosTheta 4))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* -1 (/ (- (* -2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))) (pow cosTheta 6))) (+ (* -1 (/ (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (pow cosTheta 4))) (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 2))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (/ 2 (* (pow cosTheta 6) (* (PI) (log alpha))))))))))) (pow cosTheta 4))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha)))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (+ (* -1 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* 1/2 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 4))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (+ (* -3/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha))))) (+ (* -1 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 4))) (* 1/2 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))) (pow cosTheta 4))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (+ (* -2 (/ (pow alpha 2) (* (pow cosTheta 6) (* (PI) (log alpha))))) (+ (* -3/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha))))) (+ (* -1 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (+ (* -1 (/ (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (pow cosTheta 6))) (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 4))) (* 1/2 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))))) (pow cosTheta 4))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* 1/2 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 2))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (* 3/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha))))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (* 3/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha))))) (+ (* 2 (/ (pow alpha 2) (* (pow cosTheta 6) (* (PI) (log alpha))))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))) (pow cosTheta 2))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ 1/2 (* (pow cosTheta 4) (* (PI) (log alpha))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 4))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))) (/ 3/2 (* (pow cosTheta 4) (* (PI) (log alpha)))))) (pow cosTheta 4))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (* 2 (/ 1 (* (pow cosTheta 6) (* (PI) (log alpha)))))))) (pow cosTheta 4))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2)))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (pow cosTheta 2))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 4))) (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ -1 (pow cosTheta 2))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* -1 (/ (+ 1 (/ 1 (pow cosTheta 2))) (pow cosTheta 2)))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (* -1 (/ (+ 1 (/ 1 (pow cosTheta 2))) (pow cosTheta 2))) 1) (pow cosTheta 2))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (* -1 (/ (+ 1 (/ 1 (pow cosTheta 2))) (pow cosTheta 4))) (+ 1 (/ 1 (pow cosTheta 2)))) (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(hole binary32 (* -1 (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(hole binary32 (* (pow cosTheta 2) (- (/ 1 (pow cosTheta 2)) 1))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 2)))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (/ (- (* -1 (/ (+ (/ 1 (* (PI) (log alpha))) (* 3/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (pow cosTheta 2))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 4))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (pow cosTheta 4) (* (PI) (log alpha)))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (pow cosTheta 4) (+ (* -2 (/ (* (PI) (log alpha)) (pow cosTheta 2))) (* (PI) (log alpha))))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (pow cosTheta 4) (+ (* -2 (/ (* (PI) (log alpha)) (pow cosTheta 2))) (+ (* (PI) (log alpha)) (/ (* (PI) (log alpha)) (pow cosTheta 4)))))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (pow cosTheta 4)))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (* (pow cosTheta 4) (- 1 (* 2 (/ 1 (pow cosTheta 2)))))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (* (pow cosTheta 4) (- (+ 1 (/ 1 (pow cosTheta 4))) (* 2 (/ 1 (pow cosTheta 2)))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (/ 1/2 (* (pow cosTheta 4) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (pow cosTheta 6) (* (PI) (log alpha)))))))) (pow cosTheta 2))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ -1 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (* -1 (/ (+ (/ 1 (* (PI) (log alpha))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 2)))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ (- (* -1 (/ (+ (/ 1 (* (PI) (log alpha))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 2))) (/ 1 (* (PI) (log alpha)))) (pow cosTheta 2))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ (- (* -1 (/ (+ (/ 1 (* (PI) (log alpha))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 4))) (+ (/ 1 (* (PI) (log alpha))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (- (pow alpha 2) 1))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 2))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (log (pow (pow alpha (PI)) 2)) (- (pow alpha 2) 1)))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (/ (* (+ 1 alpha) (- alpha 1)) (* (log (pow (pow alpha (PI)) 2)) (- (pow alpha 2) 1))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 4) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 3))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 2))))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 6) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 4))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (log (pow (pow alpha (PI)) 2)) (- (pow alpha 2) 1)))) (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 4) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 3))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 2)))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- alpha 1) (* (pow cosTheta 2) (- (pow alpha 2) 1)))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))) (/ alpha (- (pow alpha 2) 1))) (+ (/ 1 (- (pow alpha 2) 1)) (/ alpha (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))) (+ (/ alpha (* (pow cosTheta 4) (pow (- (pow alpha 2) 1) 3))) (/ alpha (- (pow alpha 2) 1)))) (+ (/ 1 (* (pow cosTheta 4) (pow (- (pow alpha 2) 1) 3))) (+ (/ 1 (- (pow alpha 2) 1)) (/ alpha (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2)))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))) (+ (/ 1 (* (pow cosTheta 6) (pow (- (pow alpha 2) 1) 4))) (+ (/ alpha (* (pow cosTheta 4) (pow (- (pow alpha 2) 1) 3))) (/ alpha (- (pow alpha 2) 1))))) (+ (/ 1 (* (pow cosTheta 4) (pow (- (pow alpha 2) 1) 3))) (+ (/ 1 (- (pow alpha 2) 1)) (+ (/ alpha (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))) (/ alpha (* (pow cosTheta 6) (pow (- (pow alpha 2) 1) 4))))))) (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow cosTheta 2) (- (pow alpha 2) 1))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ 1 (pow cosTheta 2)) (pow alpha 2)) 1))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))) (/ (pow alpha 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))) (+ (/ (pow alpha 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (+ (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3))))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2)))))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))) (+ (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 4))))) (+ (/ (pow alpha 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3)))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (+ (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3))))) (+ (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))) (/ (pow alpha 2) (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 4))))))))) (pow cosTheta 2))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (+ (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))) (/ (* (PI) (log (pow alpha 2))) (pow cosTheta 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ 1 (pow cosTheta 2)) (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2))))))) (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (/ 1 (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))))) (pow cosTheta 2))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2))))))))) (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3))))))))) (pow cosTheta 2))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2))))) (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 4)))))))))) (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (* 1/2 (/ (+ (/ 1 (pow alpha 2)) (pow alpha 2)) (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 4)))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (* 1/2 (/ (- (pow alpha 2) (/ 1 (pow alpha 2))) (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 4)))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3))))))))))) (pow cosTheta 2))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (+ (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))) (/ (* (PI) (log (pow alpha 2))) (pow cosTheta 2))))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (pow alpha 2) 1))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ 1 (pow cosTheta 2)) (pow alpha 2)) 1))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (/ -1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (- (* (pow alpha 2) (- (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))) (* -2 (/ (* (pow cosTheta 2) (* (PI) (log alpha))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))))) (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (* (pow alpha 2) (+ (* -1/24 (/ (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))) (* 2 (/ (* (pow cosTheta 2) (* (PI) (* (log alpha) (- (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))) (* -2 (/ (* (pow cosTheta 2) (* (PI) (log alpha))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))))))) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))))))) (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))))) (* -2 (/ (* (pow cosTheta 2) (* (PI) (log alpha))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))))) (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -2 (/ (* (pow cosTheta 2) (* (PI) (* (log alpha) (+ (* -1/24 (/ (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))) (* 2 (/ (* (pow cosTheta 2) (* (PI) (* (log alpha) (- (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))) (* -2 (/ (* (pow cosTheta 2) (* (PI) (log alpha))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))))))) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))))))))) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))))) (+ (* -1/720 (/ (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))) (* 1/24 (/ (* (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (- (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))) (* -2 (/ (* (pow cosTheta 2) (* (PI) (log alpha))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))))) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))))))))) (+ (* -1/24 (/ (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))) (* 2 (/ (* (pow cosTheta 2) (* (PI) (* (log alpha) (- (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))) (* -2 (/ (* (pow cosTheta 2) (* (PI) (log alpha))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))))))) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))))))) (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))))) (* -2 (/ (* (pow cosTheta 2) (* (PI) (log alpha))) (pow (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha)))) 2))))) (/ 1 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))))))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 -1))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (- (pow alpha 2) 1)))
#s(approx (* alpha alpha) #s(hole binary32 (pow alpha 2)))
#s(approx alpha #s(hole binary32 alpha))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (PI) (log alpha))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 2 (* (PI) (log alpha))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 2 (* (PI) (log alpha))) (* (pow alpha 2) (+ (* 1/24 (* (pow alpha 2) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 2 (* (PI) (log alpha))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 1/720 (* (pow alpha 2) (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) 1)) #s(hole binary32 (* 2 (* (PI) (log alpha)))))
#s(approx (pow (pow (* alpha alpha) (PI)) 1) #s(hole binary32 (exp (* 2 (* (PI) (log alpha))))))
#s(approx (pow (* alpha alpha) (PI)) #s(hole binary32 (exp (* 2 (* (PI) (log alpha))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) #s(hole binary32 (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) #s(hole binary32 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) #s(hole binary32 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 1/24 (* (pow alpha 2) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) #s(hole binary32 (+ (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 1/720 (* (pow alpha 2) (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha)))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 (+ (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (* (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (log alpha)))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 (+ (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow alpha 2) (+ (* 2 (* (pow alpha 2) (* (pow cosTheta 4) (* (pow (PI) 2) (* (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow (log alpha) 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (* (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (log alpha))))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(hole binary32 (+ (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (* (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (log alpha))))) (* (pow alpha 2) (+ (* 4/3 (* (pow alpha 2) (* (pow cosTheta 6) (* (pow (PI) 3) (* (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow (log alpha) 3)))))) (* 2 (* (pow cosTheta 4) (* (pow (PI) 2) (* (exp (* -2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow (log alpha) 2))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) #s(hole binary32 (* -1 (pow cosTheta 2))))
#s(approx (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (* (log alpha) (PI)) #s(hole binary32 (* (PI) (log alpha))))
#s(approx (log alpha) #s(hole binary32 (log alpha)))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ 1 (* (log alpha) (PI))) #s(hole binary32 (/ 1 (* (PI) (log alpha)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ -1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* (pow alpha 2) (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2)))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* (pow alpha 2) (- (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (* (pow cosTheta 2) (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (+ 1 (* -1 (pow cosTheta 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2)))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (/ 1 (log (pow (pow alpha (PI)) 2)))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (+ (/ 1 (log (pow (pow alpha (PI)) 2))) (/ alpha (log (pow (pow alpha (PI)) 2))))))
#s(approx (+ alpha 1) #s(hole binary32 1))
#s(approx (+ alpha 1) #s(hole binary32 (+ 1 alpha)))
#s(approx (log (pow (pow alpha (PI)) 2)) #s(hole binary32 (log (pow (pow alpha (PI)) 2))))
#s(approx (pow (pow alpha (PI)) 2) #s(hole binary32 (pow (pow alpha (PI)) 2)))
#s(approx (pow alpha (PI)) #s(hole binary32 (pow alpha (PI))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ -1 (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (/ alpha (+ 1 (* -1 (pow cosTheta 2)))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* alpha (+ (/ 1 (+ 1 (* -1 (pow cosTheta 2)))) (/ (* alpha (pow cosTheta 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* alpha (+ (* alpha (- (* -1 (/ (* alpha (pow cosTheta 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (pow cosTheta 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (- alpha 1) #s(hole binary32 -1))
#s(approx (- alpha 1) #s(hole binary32 (- alpha 1)))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (* (pow alpha 2) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1 (/ (* (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))) (+ (* -1 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2)))))) (+ 1 (* -1 (pow cosTheta 2))))) (* -1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* -2 (* (pow alpha 2) (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* -2 (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))))) (* 2 (* (pow alpha 2) (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))))))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* 2 (* (PI) (log alpha)))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* 2 (log alpha))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* -1 (pow cosTheta 2))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2)))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2)))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* -1 cosTheta)))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) cosTheta))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ cosTheta (* -1 cosTheta)))) (* -1 cosTheta))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ cosTheta (* -1 cosTheta))) (+ cosTheta (* -1 cosTheta)))) (* -1 cosTheta))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 -1))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (- (pow alpha 2) 1)))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 -1))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (- (pow alpha 6) 1)))
#s(approx (pow (* alpha alpha) 3) #s(hole binary32 (pow alpha 6)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 1))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (+ 1 (pow alpha 2))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (+ 1 (* (pow alpha 2) (+ 1 (pow alpha 2))))))
#s(approx (neg (* alpha alpha)) #s(hole binary32 (* -1 (pow alpha 2))))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(hole binary32 1))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(hole binary32 (+ 1 (pow alpha 2))))
#s(approx (* (* alpha alpha) 1) #s(hole binary32 (pow alpha 2)))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (* 1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (+ (* 1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (* 1/2 (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 1/2 (/ (* (pow cosTheta 2) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (+ (* 1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (* (pow alpha 2) (- (* -1/2 (/ (* (pow alpha 2) (* (pow cosTheta 6) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 4))))) (* -1/2 (/ (* (pow cosTheta 4) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))) (* 1/2 (/ (* (pow cosTheta 2) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) #s(hole binary32 (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)))
#s(approx (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) #s(hole binary32 (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2)))))))
#s(approx (cosh (log (* alpha alpha))) #s(hole binary32 (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2)))))
#s(approx (sinh (log (* alpha alpha))) #s(hole binary32 (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2))))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (* -1 (pow cosTheta 2))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2)))))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (* -1 cosTheta)))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) cosTheta))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (/ (pow alpha 2) (+ (* -2 (* (PI) (log (/ 1 alpha)))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (* (pow alpha 2) (- (/ 1 (+ (* -2 (* (PI) (log (/ 1 alpha)))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))) (/ 1 (* (pow alpha 2) (+ (* -2 (* (PI) (log (/ 1 alpha)))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))))))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (pow alpha 2)))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (* (pow alpha 2) (- 1 (/ 1 (pow alpha 2))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (* -2 (* (PI) (log (/ 1 alpha)))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) 1)) #s(hole binary32 (* -2 (* (PI) (log (/ 1 alpha))))))
#s(approx (pow (pow (* alpha alpha) (PI)) 1) #s(hole binary32 (exp (* -2 (* (PI) (log (/ 1 alpha)))))))
#s(approx (pow (* alpha alpha) (PI)) #s(hole binary32 (exp (* -2 (* (PI) (log (/ 1 alpha)))))))
#s(approx (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (pow cosTheta 2)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* (pow alpha 4) (+ (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (pow alpha 2))) (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1/2 (* (pow alpha 4) (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))) (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (+ (* 1/2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1/2 (* (pow alpha 2) (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (pow alpha 2))) (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* -1 (* (pow alpha 2) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (* -1 (+ (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ -1/2 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) #s(hole binary32 (/ -1/2 (* (PI) (log (/ 1 alpha))))))
#s(approx (* (log alpha) (PI)) #s(hole binary32 (* -1 (* (PI) (log (/ 1 alpha))))))
#s(approx (log alpha) #s(hole binary32 (* -1 (log (/ 1 alpha)))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* -1 (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ 1/2 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ -1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ 1 (* (log alpha) (PI))) #s(hole binary32 (/ -1 (* (PI) (log (/ 1 alpha))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))) (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (/ 1 (* (pow alpha 4) (* (pow cosTheta 6) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (+ (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (/ 1 (* (pow alpha 4) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (* -1 (/ (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (* (pow alpha 6) (* (pow cosTheta 8) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (+ (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 4) (* (pow cosTheta 6) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))) (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (/ alpha (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (* alpha (+ (/ 1 (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))) (/ 1 (* alpha (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))))
#s(approx (+ alpha 1) #s(hole binary32 alpha))
#s(approx (+ alpha 1) #s(hole binary32 (* alpha (+ 1 (/ 1 alpha)))))
#s(approx (log (pow (pow alpha (PI)) 2)) #s(hole binary32 (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))
#s(approx (pow (pow alpha (PI)) 2) #s(hole binary32 (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))
#s(approx (pow alpha (PI)) #s(hole binary32 (exp (* -1 (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ 1 (* alpha (pow cosTheta 2)))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (/ 1 (pow cosTheta 2)) (/ 1 (* alpha (pow cosTheta 2)))) alpha)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow alpha 2) (pow cosTheta 2))) (/ 1 (pow cosTheta 2))) (+ (/ 1 (* alpha (pow cosTheta 2))) (/ 1 (* (pow alpha 2) (pow cosTheta 4))))) alpha)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow alpha 2) (pow cosTheta 2))) (+ (/ 1 (* (pow alpha 3) (pow cosTheta 4))) (/ 1 (pow cosTheta 2)))) (+ (/ 1 (* alpha (pow cosTheta 2))) (+ (/ 1 (* (pow alpha 2) (pow cosTheta 4))) (/ 1 (* (pow alpha 3) (pow cosTheta 2)))))) alpha)))
#s(approx (- alpha 1) #s(hole binary32 alpha))
#s(approx (- alpha 1) #s(hole binary32 (* alpha (- 1 (/ 1 alpha)))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (+ (/ 1 (pow alpha 2)) (pow cosTheta 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow cosTheta 2))) (pow alpha 4))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* -1 (/ (* (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow cosTheta 2))) (+ (* -1 (/ (* (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow cosTheta 2))) (- 1 (pow cosTheta 2))) (pow cosTheta 2))) (* -1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow alpha 6))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow alpha 4) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 6))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4)))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* -2 (* (PI) (log (/ 1 alpha))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* -2 (log (/ 1 alpha)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (/ 1 (pow alpha 2)) (pow cosTheta 2)) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (pow alpha 4))) (+ (/ 1 (pow alpha 2)) (pow cosTheta 2))) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (pow cosTheta 2) (pow alpha 6))) (+ (/ 1 (pow alpha 2)) (+ (/ (pow cosTheta 2) (pow alpha 6)) (pow cosTheta 2)))) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 4))) (+ (/ (pow cosTheta 2) (pow alpha 2)) (/ (pow cosTheta 2) (pow alpha 4))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (pow cosTheta 2)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (pow alpha 4))) (pow cosTheta 2)) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (pow cosTheta 2) (pow alpha 6))) (+ (/ (pow cosTheta 2) (pow alpha 6)) (pow cosTheta 2))) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 4))) (+ (/ (pow cosTheta 2) (pow alpha 2)) (/ (pow cosTheta 2) (pow alpha 4))))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) cosTheta)))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ cosTheta (* -1 (/ cosTheta (pow alpha 2)))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ cosTheta (* -1 (/ (+ cosTheta (* -1 cosTheta)) (pow alpha 4)))) (/ cosTheta (pow alpha 2))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ cosTheta (+ (* -1 (/ cosTheta (pow alpha 6))) (/ cosTheta (pow alpha 6)))) (+ (* -1 (/ cosTheta (pow alpha 4))) (+ (/ cosTheta (pow alpha 2)) (/ cosTheta (pow alpha 4))))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (pow alpha 2)))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (* (pow alpha 2) (- 1 (/ 1 (pow alpha 2))))))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (pow alpha 6)))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (* (pow alpha 6) (- 1 (/ 1 (pow alpha 6))))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (pow alpha 4)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (* (pow alpha 4) (+ 1 (/ 1 (pow alpha 2))))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (* (pow alpha 4) (+ 1 (+ (/ 1 (pow alpha 2)) (/ 1 (pow alpha 4)))))))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(hole binary32 (pow alpha 2)))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(hole binary32 (* (pow alpha 2) (+ 1 (/ 1 (pow alpha 2))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (* -1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (+ (* -1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* 1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow alpha 2))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* -1/2 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 4) (* (pow cosTheta 6) (* (PI) (log (/ 1 alpha))))))) (* -1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (* -1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow alpha 2))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* -1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* 1/2 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 6) (* (pow cosTheta 8) (* (PI) (log (/ 1 alpha)))))))) (+ (* -1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 4) (* (pow cosTheta 6) (* (PI) (log (/ 1 alpha))))))))) (pow alpha 2))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))) (pow alpha 2)))))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (+ (/ 1 (pow alpha 2)) (pow cosTheta 2))))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (* (* (- (* alpha alpha) 1) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (pow cosTheta 2)))))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (* (pow alpha 2) cosTheta)))
#s(approx (* (- (* alpha alpha) 1) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ cosTheta (* -1 (/ cosTheta (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (/ (pow alpha 2) (+ (* -2 (* (PI) (log (/ -1 alpha)))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) #s(hole binary32 (* (pow alpha 2) (- (/ 1 (+ (* -2 (* (PI) (log (/ -1 alpha)))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))) (/ 1 (* (pow alpha 2) (+ (* -2 (* (PI) (log (/ -1 alpha)))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) #s(hole binary32 (+ (* -2 (* (PI) (log (/ -1 alpha)))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) 1)) #s(hole binary32 (* -2 (* (PI) (log (/ -1 alpha))))))
#s(approx (pow (pow (* alpha alpha) (PI)) 1) #s(hole binary32 (exp (* -2 (* (PI) (log (/ -1 alpha)))))))
#s(approx (pow (* alpha alpha) (PI)) #s(hole binary32 (exp (* -2 (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* -1 (/ (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ 1/2 (* (pow alpha 2) (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* -1/2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ 1/2 (* (pow alpha 2) (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (* -1/2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (/ 1/2 (* (pow alpha 4) (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ 1/2 (* (pow alpha 2) (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* -1/2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1/2 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) #s(hole binary32 (/ 1/2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (* (log alpha) (PI)) #s(hole binary32 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))
#s(approx (log alpha) #s(hole binary32 (+ (log -1) (* -1 (log (/ -1 alpha))))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ -1/2 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ 1 (* (log alpha) (PI))) #s(hole binary32 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (pow alpha 2))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (pow alpha 2))) (+ (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))) (* (pow alpha 4) (pow cosTheta 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1 (/ (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (pow alpha 2))) (+ (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (/ alpha (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (* alpha (+ (/ 1 (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))) (/ 1 (* alpha (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))))
#s(approx (log (pow (pow alpha (PI)) 2)) #s(hole binary32 (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))
#s(approx (pow (pow alpha (PI)) 2) #s(hole binary32 (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))
#s(approx (pow alpha (PI)) #s(hole binary32 (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (/ 1 (* alpha (pow cosTheta 2))) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (/ 1 (* alpha (pow cosTheta 2))) (+ (/ 1 (* alpha (pow cosTheta 4))) (/ 1 (pow cosTheta 2)))) alpha)) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (- (/ 1 (pow cosTheta 2)) (/ 1 (pow cosTheta 4)))) (/ 1 (* alpha (pow cosTheta 2)))) (/ 1 (* alpha (pow cosTheta 4)))) alpha)) (/ 1 (pow cosTheta 2))) alpha)) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (- alpha 1) #s(hole binary32 (* -1 (* alpha (- (/ 1 alpha) 1)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow cosTheta 2))) (pow alpha 4))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* -1 (/ (* (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow cosTheta 2))) (+ (* -1 (/ (* (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow cosTheta 2))) (- 1 (pow cosTheta 2))) (pow cosTheta 2))) (* -1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow alpha 6))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow alpha 4) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 6))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4)))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* -2 (* (PI) (log (/ -1 alpha))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* -2 (log (/ -1 alpha)))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (* -1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (+ (* -1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* 1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow alpha 2))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* -1/2 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 4) (* (pow cosTheta 6) (* (PI) (log (/ -1 alpha))))))) (* -1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (* -1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow alpha 2))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (* -1/2 (/ (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* 1/2 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 6) (* (pow cosTheta 8) (* (PI) (log (/ -1 alpha)))))))) (+ (* -1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (+ (* 1/2 (+ (/ 1 (pow alpha 2)) (pow alpha 2))) (* 1/2 (- (pow alpha 2) (/ 1 (pow alpha 2))))) 1)) (* (pow alpha 4) (* (pow cosTheta 6) (* (PI) (log (/ -1 alpha))))))))) (pow alpha 2))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))) (pow alpha 2)))))))
Outputs
(/.f32 (neg.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (neg.f32 (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
(-.f32 (/.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (/.f32 #s(literal 1 binary32) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
(expm1.f32 (*.f32 (log.f32 alpha) #s(literal 2 binary32)))
(/.f32 (neg.f32 (-.f32 (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 alpha alpha) alpha)) #s(literal 1 binary32))) (neg.f32 (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
(/.f32 (-.f32 (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 alpha alpha) alpha)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
(-.f32 (/.f32 (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 alpha alpha) alpha)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (/.f32 #s(literal 1 binary32) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
(-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(*.f32 (neg.f32 alpha) (neg.f32 alpha))
(*.f32 (fabs.f32 alpha) (fabs.f32 alpha))
(*.f32 alpha alpha)
(pow.f32 alpha #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 alpha) #s(literal 2 binary32)))
alpha
#s(literal 1 binary32)
(log.f32 (*.f32 (*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32))) (pow.f32 (pow.f32 (*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32))) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
(/.f32 (fma.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (pow.f32 (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) #s(literal 3 binary32))) (fma.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))
(fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(fma.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(fma.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(+.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(log.f32 (*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32))))
(*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))
(*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)))
(*.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
(*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32)))
(pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))
(pow.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) #s(literal 1 binary32)))
(pow.f32 (*.f32 alpha alpha) (PI.f32))
(pow.f32 (*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32))) #s(literal 1 binary32))
(pow.f32 alpha (*.f32 #s(literal 2 binary32) (PI.f32)))
(pow.f32 alpha (*.f32 (PI.f32) #s(literal 2 binary32)))
(exp.f32 (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 1 binary32)))
(exp.f32 (*.f32 (log.f32 (*.f32 alpha alpha)) (PI.f32)))
(exp.f32 (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32)))
(*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32)))
(pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))
(pow.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) #s(literal 1 binary32)))
(pow.f32 (*.f32 alpha alpha) (PI.f32))
(pow.f32 (*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32))) #s(literal 1 binary32))
(pow.f32 alpha (*.f32 #s(literal 2 binary32) (PI.f32)))
(pow.f32 alpha (*.f32 (PI.f32) #s(literal 2 binary32)))
(exp.f32 (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 1 binary32)))
(exp.f32 (*.f32 (log.f32 (*.f32 alpha alpha)) (PI.f32)))
(exp.f32 (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32)))
(PI.f32)
(log.f32 (pow.f32 (pow.f32 (*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32))) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
(pow.f32 (pow.f32 (*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32))) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
(pow.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
(pow.f32 (*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(exp.f32 (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
(*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
(*.f32 (neg.f32 cosTheta) (neg.f32 cosTheta))
(*.f32 (fabs.f32 cosTheta) (fabs.f32 cosTheta))
(*.f32 cosTheta cosTheta)
(pow.f32 cosTheta #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 cosTheta) #s(literal 2 binary32)))
cosTheta
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (fma.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
(/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))))
(fma.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))
(+.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))
(/.f32 (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32)) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32)) (*.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32))) (-.f32 (*.f32 (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 (*.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))))))
(fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))
(+.f32 (*.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))
(/.f32 (neg.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (neg.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))
(*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))
(*.f32 (neg.f32 (*.f32 alpha cosTheta)) (neg.f32 (*.f32 alpha cosTheta)))
(*.f32 (fabs.f32 (*.f32 alpha cosTheta)) (fabs.f32 (*.f32 alpha cosTheta)))
(*.f32 (*.f32 alpha cosTheta) (*.f32 alpha cosTheta))
(*.f32 (*.f32 alpha alpha) (*.f32 cosTheta cosTheta))
(pow.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) #s(literal 1 binary32))
(pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))
(*.f32 (pow.f32 alpha #s(literal 1 binary32)) (pow.f32 cosTheta #s(literal 1 binary32)))
(*.f32 alpha cosTheta)
(pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))
(exp.f32 (*.f32 (log.f32 (*.f32 alpha cosTheta)) #s(literal 1 binary32)))
(*.f32 (pow.f32 alpha #s(literal 1 binary32)) (pow.f32 cosTheta #s(literal 1 binary32)))
(*.f32 alpha cosTheta)
(pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))
(exp.f32 (*.f32 (log.f32 (*.f32 alpha cosTheta)) #s(literal 1 binary32)))
(/.f32 (-.f32 (pow.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) #s(literal 3 binary32)) (pow.f32 (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (fma.f32 (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))) (*.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))))
(-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))
(*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal -1/2 binary32) (neg.f32 (*.f32 (log.f32 alpha) (PI.f32))))
(/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32)))
#s(literal 1/2 binary32)
(*.f32 (log.f32 alpha) (PI.f32))
(log.f32 alpha)
(/.f32 #s(literal -1 binary32) (neg.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))
(pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal -1 binary32))
(/.f32 (+.f32 (pow.f32 (*.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32)) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (*.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32)) #s(literal 1 binary32)))))
(fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))
(+.f32 (*.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32)) #s(literal 1 binary32))
#s(literal -1 binary32)
(*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))
(/.f32 (neg.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta))) (neg.f32 (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))
(/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))
(*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta))
#s(literal -1/2 binary32)
(*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))
(*.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))
(pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal 2 binary32)))
#s(literal 2 binary32)
(*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))
(*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal -1 binary32) (neg.f32 (*.f32 (log.f32 alpha) (PI.f32))))
(/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32)))
(pow.f32 (*.f32 (log.f32 alpha) (PI.f32)) #s(literal -1 binary32))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 (*.f32 (+.f32 alpha #s(literal 1 binary32)) (-.f32 alpha #s(literal 1 binary32))) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 (neg.f32 (+.f32 alpha #s(literal 1 binary32))) (neg.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(/.f32 (+.f32 alpha #s(literal 1 binary32)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
(+.f32 (/.f32 alpha (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(/.f32 (fma.f32 (*.f32 alpha alpha) alpha #s(literal 1 binary32)) (fma.f32 alpha alpha (-.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32)))))
(+.f32 alpha #s(literal 1 binary32))
(log.f32 (*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32))))
(*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))
(*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)))
(*.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
(*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32)))
(pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))
(pow.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) #s(literal 1 binary32)))
(pow.f32 (*.f32 alpha alpha) (PI.f32))
(pow.f32 (*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32))) #s(literal 1 binary32))
(pow.f32 alpha (*.f32 #s(literal 2 binary32) (PI.f32)))
(pow.f32 alpha (*.f32 (PI.f32) #s(literal 2 binary32)))
(exp.f32 (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 1 binary32)))
(exp.f32 (*.f32 (log.f32 (*.f32 alpha alpha)) (PI.f32)))
(exp.f32 (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32)))
(pow.f32 alpha (PI.f32))
(exp.f32 (*.f32 (log.f32 alpha) (PI.f32)))
(/.f32 (neg.f32 (-.f32 alpha #s(literal 1 binary32))) (neg.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(-.f32 (/.f32 alpha (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32)))))
(-.f32 alpha #s(literal 1 binary32))
(/.f32 (+.f32 (pow.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) #s(literal 3 binary32)) #s(literal 1 binary32)) (+.f32 (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) #s(literal 1 binary32)))))
(fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))
(+.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) #s(literal 1 binary32))
(/.f32 (neg.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (neg.f32 (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
(-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)))))
(*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)))
(log.f32 (*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32))))
(*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))
(*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)))
(*.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
(log.f32 (*.f32 alpha alpha))
(*.f32 #s(literal 2 binary32) (log.f32 alpha))
(+.f32 (log.f32 alpha) (log.f32 alpha))
(/.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)) (*.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)))))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))
(*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)
(*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta)
(expm1.f32 (*.f32 (log.f32 alpha) #s(literal 2 binary32)))
(/.f32 (neg.f32 (-.f32 (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 alpha alpha) alpha)) #s(literal 1 binary32))) (neg.f32 (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
(/.f32 (-.f32 (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 alpha alpha) alpha)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
(-.f32 (/.f32 (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 alpha alpha) alpha)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (/.f32 #s(literal 1 binary32) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
(-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(expm1.f32 (*.f32 (log.f32 (*.f32 alpha alpha)) #s(literal 3 binary32)))
(/.f32 (-.f32 (pow.f32 (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 alpha alpha) alpha)) #s(literal 3 binary32)) #s(literal 1 binary32)) (+.f32 (*.f32 (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 alpha alpha) alpha)) (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 alpha alpha) alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 alpha alpha) alpha)) #s(literal 1 binary32)))))
(-.f32 (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 alpha alpha) alpha)) #s(literal 1 binary32))
(*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha)) (*.f32 alpha alpha))
(*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 alpha alpha) alpha))
(*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha)))
(pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32))
(exp.f32 (*.f32 (log.f32 (*.f32 alpha alpha)) #s(literal 3 binary32)))
#s(literal 3 binary32)
(/.f32 (+.f32 (pow.f32 (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha)) (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha))) (-.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
(fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(fma.f32 (neg.f32 (neg.f32 (*.f32 alpha alpha))) (neg.f32 (neg.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(fma.f32 (fabs.f32 (neg.f32 (*.f32 alpha alpha))) (fabs.f32 (neg.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(fma.f32 (*.f32 alpha alpha) (*.f32 alpha alpha) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(+.f32 (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(neg.f32 (*.f32 alpha alpha))
(/.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
(*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(/.f32 (neg.f32 (expm1.f32 (log.f32 (*.f32 alpha alpha)))) (neg.f32 (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)))))
(/.f32 (expm1.f32 (log.f32 (*.f32 alpha alpha))) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
(-.f32 (/.f32 (exp.f32 (log.f32 (*.f32 alpha alpha))) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)))))
(expm1.f32 (log.f32 (*.f32 alpha alpha)))
(/.f32 (-.f32 (pow.f32 (exp.f32 (log.f32 (*.f32 alpha alpha))) #s(literal 3 binary32)) #s(literal 1 binary32)) (+.f32 (*.f32 (exp.f32 (log.f32 (*.f32 alpha alpha))) (exp.f32 (log.f32 (*.f32 alpha alpha)))) (+.f32 #s(literal 1 binary32) (*.f32 (exp.f32 (log.f32 (*.f32 alpha alpha))) #s(literal 1 binary32)))))
(-.f32 (exp.f32 (log.f32 (*.f32 alpha alpha))) #s(literal 1 binary32))
(/.f32 (+.f32 (pow.f32 (cosh.f32 (log.f32 (*.f32 alpha alpha))) #s(literal 3 binary32)) (pow.f32 (sinh.f32 (log.f32 (*.f32 alpha alpha))) #s(literal 3 binary32))) (+.f32 (*.f32 (cosh.f32 (log.f32 (*.f32 alpha alpha))) (cosh.f32 (log.f32 (*.f32 alpha alpha)))) (-.f32 (*.f32 (sinh.f32 (log.f32 (*.f32 alpha alpha))) (sinh.f32 (log.f32 (*.f32 alpha alpha)))) (*.f32 (cosh.f32 (log.f32 (*.f32 alpha alpha))) (sinh.f32 (log.f32 (*.f32 alpha alpha)))))))
(+.f32 (cosh.f32 (log.f32 (*.f32 alpha alpha))) (sinh.f32 (log.f32 (*.f32 alpha alpha))))
(exp.f32 (log.f32 (*.f32 alpha alpha)))
(/.f32 (+.f32 (exp.f32 (log.f32 (*.f32 alpha alpha))) (exp.f32 (neg.f32 (log.f32 (*.f32 alpha alpha))))) #s(literal 2 binary32))
(cosh.f32 (neg.f32 (log.f32 (*.f32 alpha alpha))))
(cosh.f32 (log.f32 (*.f32 alpha alpha)))
(/.f32 (-.f32 (exp.f32 (log.f32 (*.f32 alpha alpha))) (exp.f32 (neg.f32 (log.f32 (*.f32 alpha alpha))))) #s(literal 2 binary32))
(sinh.f32 (log.f32 (*.f32 alpha alpha)))
(*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)))
(/.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)) (*.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)))))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))
(*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta)
(*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta)
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 alpha alpha) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1 binary32) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/24 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32))))))) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 (*.f32 alpha alpha) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/24 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (fma.f32 #s(literal -1/24 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32))) (*.f32 #s(literal 1/720 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -360 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (fma.f32 #s(literal 120 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (*.f32 #s(literal 240 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)))))))) (fma.f32 #s(literal -1 binary32) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/24 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32))))))) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 (*.f32 alpha alpha) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/24 binary32) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/720 binary32) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -360 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (fma.f32 #s(literal 120 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (*.f32 #s(literal 240 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))))) (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/24 binary32) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/720 binary32) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -360 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (fma.f32 #s(literal 120 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (*.f32 #s(literal 240 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))))) (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/40320 binary32) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -10080 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))) (fma.f32 #s(literal -6720 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))) (fma.f32 #s(literal -5040 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))) (fma.f32 #s(literal 1680 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))) (*.f32 #s(literal 20160 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))))))))) (*.f32 #s(literal 1/720 binary32) (fma.f32 #s(literal -360 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (fma.f32 #s(literal 120 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (*.f32 #s(literal 240 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))))))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) #s(literal 1 binary32))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/6 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))) (*.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))))))
#s(approx (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
#s(approx (* cosTheta cosTheta) (*.f32 cosTheta cosTheta))
#s(approx cosTheta cosTheta)
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 alpha alpha) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (/.f32 (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 alpha alpha) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 (*.f32 alpha alpha) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))))))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (/.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))
#s(approx (pow (* alpha cosTheta) 1) (*.f32 alpha cosTheta))
#s(approx (pow (* alpha cosTheta) 1) (*.f32 alpha cosTheta))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(literal 1 binary32))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (+.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(literal 1 binary32))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (* -1/2 (* cosTheta cosTheta)) (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (*.f32 (PI.f32) (log.f32 alpha)))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (fma.f32 (PI.f32) (log.f32 alpha) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(literal 1 binary32))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -2 binary32) (*.f32 cosTheta cosTheta))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32)))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (fma.f32 (*.f32 cosTheta cosTheta) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 alpha #s(literal 1 binary32)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (+.f32 alpha (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) #s(literal 1 binary32)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (+.f32 alpha (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) #s(literal 1 binary32)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (+.f32 alpha (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))) (*.f32 #s(literal -1 binary32) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) #s(literal 1 binary32)))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(literal 1 binary32))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 alpha alpha) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (/.f32 (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 alpha alpha) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (*.f32 (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (log.f32 (*.f32 alpha alpha))))) (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (PI.f32)) (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (log.f32 (*.f32 alpha alpha))))))) (/.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 (*.f32 alpha alpha) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(literal 1 binary32))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32))) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/.f32 (*.f32 cosTheta (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32))) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (log.f32 (*.f32 alpha alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (/.f32 (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (log.f32 (*.f32 alpha alpha))))) (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (PI.f32)) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (log.f32 (*.f32 alpha alpha))))))) (*.f32 (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (PI.f32)) (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (log.f32 (*.f32 alpha alpha)))))))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(literal 1 binary32))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 cosTheta (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) (pow.f32 (exp.f32 (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 1 binary32))) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 1 binary32))) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) #s(literal 1 binary32))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))))) (*.f32 cosTheta cosTheta)))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta)))) (*.f32 cosTheta cosTheta)))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (fma.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 cosTheta cosTheta)))))) (*.f32 cosTheta cosTheta)))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (+.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 6 binary32))) (/.f32 (fma.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 cosTheta cosTheta)))))))) (*.f32 cosTheta cosTheta)))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))))) (pow.f32 cosTheta #s(literal 6 binary32))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 #s(literal 2 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (log.f32 alpha))))))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (/.f32 (-.f32 (fma.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (/.f32 (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 6 binary32))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta)))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 3/2 binary32))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 4 binary32)))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (/.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 cosTheta cosTheta))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 cosTheta cosTheta))) #s(literal 1 binary32)) (*.f32 cosTheta cosTheta)))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 cosTheta #s(literal 4 binary32)))) (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 cosTheta cosTheta)))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) #s(literal 1 binary32))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 4 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 cosTheta cosTheta)) (fma.f32 (PI.f32) (log.f32 alpha) (/.f32 (*.f32 (PI.f32) (log.f32 alpha)) (pow.f32 cosTheta #s(literal 4 binary32)))))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) (pow.f32 cosTheta #s(literal 4 binary32)))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 cosTheta #s(literal 4 binary32)))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta)))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta)))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal -1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (*.f32 #s(literal -1 binary32) (/.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 1 binary32))) (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 1 binary32))) (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 1 binary32))) (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (pow.f32 cosTheta #s(literal 4 binary32)))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 1 binary32))) (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 cosTheta cosTheta)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 cosTheta cosTheta)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 (/.f32 (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) alpha)) (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (-.f32 (fma.f32 (/.f32 (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) alpha)) (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (pow.f32 cosTheta #s(literal 4 binary32))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 cosTheta cosTheta)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (pow.f32 cosTheta #s(literal 6 binary32))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))))) (*.f32 (/.f32 (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) alpha)) (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (pow.f32 cosTheta #s(literal 4 binary32))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 cosTheta cosTheta)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (/.f32 alpha (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) alpha)) (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (+.f32 (/.f32 alpha (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))) (/.f32 alpha (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) alpha)) (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32)))) (+.f32 (/.f32 alpha (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))) (/.f32 alpha (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))) (+.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (/.f32 (fma.f32 alpha (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) alpha)) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32)))))))) (*.f32 cosTheta cosTheta)))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 alpha alpha)) #s(literal 1 binary32))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (+.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (*.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (*.f32 alpha alpha))) (*.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) #s(literal 4 binary32)))))) (+.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (/.f32 (fma.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) #s(literal 4 binary32))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (*.f32 alpha alpha))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) #s(literal 4 binary32)))))))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 cosTheta cosTheta)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 cosTheta cosTheta) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) #s(literal 1 binary32))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))))))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32)))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))))))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (/.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 cosTheta cosTheta)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 alpha alpha)) #s(literal 1 binary32))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (/.f32 #s(literal -1 binary32) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 #s(literal 1 binary32) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (/.f32 #s(literal 1 binary32) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/24 binary32) (/.f32 (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32))))) (*.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (/.f32 #s(literal 1 binary32) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (/.f32 #s(literal 1 binary32) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (/.f32 #s(literal 1 binary32) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (fma.f32 #s(literal -1/24 binary32) (/.f32 (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32))))) (*.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (/.f32 #s(literal 1 binary32) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (+.f32 (*.f32 #s(literal -1/720 binary32) (/.f32 (fma.f32 #s(literal -2880 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 3 binary32))) (fma.f32 #s(literal 960 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 3 binary32))) (*.f32 #s(literal 1920 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 3 binary32)))))) (*.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 1/24 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32))))) (-.f32 (/.f32 #s(literal 1 binary32) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))))) (fma.f32 #s(literal -1/24 binary32) (/.f32 (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32))))) (*.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (/.f32 #s(literal 1 binary32) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (/.f32 #s(literal 1 binary32) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (/.f32 #s(literal 1 binary32) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(literal -1 binary32))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
#s(approx (* alpha alpha) (*.f32 alpha alpha))
#s(approx alpha alpha)
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/24 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32)))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/720 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2880 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 3 binary32))) (fma.f32 #s(literal 960 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 3 binary32))) (*.f32 #s(literal 1920 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 3 binary32))))))) (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32)))))))))))))
#s(approx (log (pow (pow alpha (PI)) 2)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (pow (pow alpha (PI)) 2) (pow.f32 (exp.f32 #s(literal 2 binary32)) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (pow (pow alpha (PI)) 2) (pow.f32 (exp.f32 #s(literal 2 binary32)) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) (*.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/24 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32)))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/720 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2880 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 3 binary32))) (fma.f32 #s(literal 960 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 3 binary32))) (*.f32 #s(literal 1920 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 3 binary32))))))) (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32))))))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) (pow.f32 (exp.f32 #s(literal -2 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) (+.f32 (pow.f32 (exp.f32 #s(literal -2 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (exp.f32 #s(literal -2 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) (+.f32 (pow.f32 (exp.f32 #s(literal -2 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (exp.f32 #s(literal -2 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (exp.f32 #s(literal -2 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))) (+.f32 (pow.f32 (exp.f32 #s(literal -2 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (exp.f32 #s(literal -2 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 4/3 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (PI.f32)) (*.f32 (pow.f32 (exp.f32 #s(literal -2 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 2 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (exp.f32 #s(literal -2 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))
#s(approx (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (log alpha) (PI)) (*.f32 (PI.f32) (log.f32 alpha)))
#s(approx (log alpha) (log.f32 alpha))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ 1 (* (log alpha) (PI))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 #s(literal -1 binary32) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 (*.f32 alpha alpha) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/.f32 (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) alpha)) (pow.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 2 binary32))))
#s(approx (+ alpha 1) #s(literal 1 binary32))
#s(approx (+ alpha 1) (+.f32 #s(literal 1 binary32) alpha))
#s(approx (log (pow (pow alpha (PI)) 2)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (pow (pow alpha (PI)) 2) (*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32))))
#s(approx (pow alpha (PI)) (pow.f32 alpha (PI.f32)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 #s(literal -1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (*.f32 alpha (*.f32 cosTheta cosTheta)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (*.f32 alpha (fma.f32 alpha (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha (*.f32 cosTheta cosTheta)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (- alpha 1) #s(literal -1 binary32))
#s(approx (- alpha 1) (-.f32 alpha #s(literal 1 binary32)))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (+.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))))))))))))
#s(approx (log (pow (pow alpha (PI)) 2)) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (log (* alpha alpha)) (log.f32 (*.f32 alpha alpha)))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 #s(literal -1 binary32) cosTheta))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (fma.f32 #s(literal -1 binary32) cosTheta (*.f32 (*.f32 alpha alpha) cosTheta)))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (fma.f32 #s(literal -1 binary32) cosTheta (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (+.f32 cosTheta (*.f32 #s(literal -1 binary32) cosTheta)))) (*.f32 #s(literal -1 binary32) cosTheta)))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (+.f32 (*.f32 #s(literal -1 binary32) cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (+.f32 cosTheta (*.f32 #s(literal -1 binary32) cosTheta))) (+.f32 cosTheta (*.f32 #s(literal -1 binary32) cosTheta)))) (*.f32 #s(literal -1 binary32) cosTheta)))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(literal -1 binary32))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(literal -1 binary32))
#s(approx (- (pow (* alpha alpha) 3) 1) (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)))
#s(approx (pow (* alpha alpha) 3) (pow.f32 alpha #s(literal 6 binary32)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(literal 1 binary32))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (neg (* alpha alpha)) (*.f32 #s(literal -1 binary32) (*.f32 alpha alpha)))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(literal 1 binary32))
#s(approx (+ 1 (* (* alpha alpha) 1)) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))
#s(approx (* (* alpha alpha) 1) (*.f32 alpha alpha))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32))) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32))) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32))) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 4 binary32)))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (PI.f32)) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))
#s(approx (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)))
#s(approx (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))))
#s(approx (cosh (log (* alpha alpha))) (*.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha))))
#s(approx (sinh (log (* alpha alpha))) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 #s(literal -1 binary32) cosTheta))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (fma.f32 #s(literal -1 binary32) cosTheta (*.f32 (*.f32 alpha alpha) cosTheta)))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (/.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 #s(literal 1 binary32) (fma.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 alpha alpha))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) (fma.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (log (pow (pow alpha (PI)) 2)) (*.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))
#s(approx (pow (pow alpha (PI)) 2) (pow.f32 (exp.f32 #s(literal -2 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))
#s(approx (pow (pow alpha (PI)) 2) (pow.f32 (exp.f32 #s(literal -2 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))
#s(approx (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))
#s(approx (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (*.f32 cosTheta cosTheta))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta)))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 alpha alpha)) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 alpha alpha)) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (*.f32 #s(literal -1 binary32) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))
#s(approx (* (log alpha) (PI)) (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))
#s(approx (log alpha) (*.f32 #s(literal -1 binary32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ 1 (* (log alpha) (PI))) (/.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (*.f32 cosTheta cosTheta)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (*.f32 cosTheta cosTheta)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (pow.f32 cosTheta #s(literal 4 binary32))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (pow.f32 cosTheta #s(literal 6 binary32)))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (*.f32 cosTheta cosTheta))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (pow.f32 cosTheta #s(literal 4 binary32))))) (*.f32 (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (pow.f32 cosTheta #s(literal 4 binary32))))) #s(literal 1 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (pow.f32 cosTheta #s(literal 4 binary32))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (pow.f32 cosTheta #s(literal 4 binary32)))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (pow.f32 cosTheta #s(literal 8 binary32)))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (*.f32 cosTheta cosTheta))))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (pow.f32 cosTheta #s(literal 6 binary32)))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (pow.f32 cosTheta #s(literal 4 binary32)))))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/.f32 alpha (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha))))))
#s(approx (+ alpha 1) alpha)
#s(approx (+ alpha 1) (*.f32 alpha (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) alpha))))
#s(approx (log (pow (pow alpha (PI)) 2)) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))))
#s(approx (pow (pow alpha (PI)) 2) (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))
#s(approx (pow alpha (PI)) (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) alpha) (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta))) alpha)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 (*.f32 alpha (*.f32 cosTheta cosTheta)) #s(literal 1 binary32))) (*.f32 (*.f32 alpha (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 alpha alpha) (pow.f32 cosTheta #s(literal 4 binary32)))))) alpha))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (pow.f32 cosTheta #s(literal 4 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (*.f32 alpha alpha) (pow.f32 cosTheta #s(literal 4 binary32))) #s(literal 1 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 cosTheta cosTheta)))))) alpha))
#s(approx (- alpha 1) alpha)
#s(approx (- alpha 1) (*.f32 alpha (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) alpha))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 cosTheta cosTheta)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 cosTheta cosTheta))) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 cosTheta cosTheta)) (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 #s(literal -2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha)) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 6 binary32))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha)) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 4 binary32)))))))))
#s(approx (log (pow (pow alpha (PI)) 2)) (*.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))
#s(approx (log (* alpha alpha)) (*.f32 #s(literal -2 binary32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 alpha alpha) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 cosTheta cosTheta)) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (pow.f32 alpha #s(literal 4 binary32))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 cosTheta cosTheta))) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 6 binary32))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (+.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 6 binary32))) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (*.f32 (*.f32 alpha alpha) (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (*.f32 cosTheta cosTheta))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (pow.f32 alpha #s(literal 4 binary32))) (*.f32 cosTheta cosTheta)) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 6 binary32))) (+.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 6 binary32))) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (*.f32 (*.f32 alpha alpha) (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 (*.f32 alpha alpha) cosTheta))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 (*.f32 alpha alpha) (+.f32 cosTheta (*.f32 #s(literal -1 binary32) (/.f32 cosTheta (*.f32 alpha alpha))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (+.f32 cosTheta (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 cosTheta (*.f32 #s(literal -1 binary32) cosTheta)) (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 cosTheta (*.f32 alpha alpha)))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (+.f32 cosTheta (fma.f32 #s(literal -1 binary32) (/.f32 cosTheta (pow.f32 alpha #s(literal 6 binary32))) (/.f32 cosTheta (pow.f32 alpha #s(literal 6 binary32))))) (fma.f32 #s(literal -1 binary32) (/.f32 cosTheta (pow.f32 alpha #s(literal 4 binary32))) (+.f32 (/.f32 cosTheta (*.f32 alpha alpha)) (/.f32 cosTheta (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 alpha alpha))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (- (pow (* alpha alpha) 3) 1) (pow.f32 alpha #s(literal 6 binary32)))
#s(approx (- (pow (* alpha alpha) 3) 1) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 alpha #s(literal 6 binary32))))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (pow.f32 alpha #s(literal 4 binary32)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (+.f32 #s(literal 1 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (/.f32 #s(literal 1 binary32) (pow.f32 alpha #s(literal 4 binary32)))))))
#s(approx (+ 1 (* (* alpha alpha) 1)) (*.f32 alpha alpha))
#s(approx (+ 1 (* (* alpha alpha) 1)) (*.f32 (*.f32 alpha alpha) (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (fma.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 alpha alpha)) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 alpha alpha)))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (fma.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 alpha alpha)) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 alpha alpha)))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (fma.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 8 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (fma.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 alpha alpha)) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))) (*.f32 alpha alpha)))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 #s(literal -2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 alpha alpha))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 cosTheta cosTheta)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (*.f32 cosTheta cosTheta))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 (*.f32 alpha alpha) cosTheta))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 (*.f32 alpha alpha) (+.f32 cosTheta (*.f32 #s(literal -1 binary32) (/.f32 cosTheta (*.f32 alpha alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (/.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
#s(approx (/ (- (* alpha alpha) 1) (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 #s(literal 1 binary32) (fma.f32 #s(literal -2 binary32) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))))))
#s(approx (+ (log (pow (pow (* alpha alpha) (PI)) 1)) (log (pow (pow (* alpha alpha) (PI)) (* (* cosTheta cosTheta) (- (* alpha alpha) 1))))) (fma.f32 #s(literal -2 binary32) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (log (pow (pow alpha (PI)) 2)) (*.f32 #s(literal -2 binary32) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))
#s(approx (pow (pow alpha (PI)) 2) (pow.f32 (exp.f32 #s(literal -2 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))
#s(approx (pow (pow alpha (PI)) 2) (pow.f32 (exp.f32 #s(literal -2 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 cosTheta cosTheta))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (pow.f32 cosTheta #s(literal 4 binary32))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 cosTheta cosTheta)))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (+ (* (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (/ (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (* (* (pow (* alpha cosTheta) 1) (pow (* alpha cosTheta) 1)) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (* (log alpha) (PI)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))
#s(approx (log alpha) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))
#s(approx (/ (* -1/2 (* cosTheta cosTheta)) (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* (* (log alpha) (PI)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ 1 (* (log alpha) (PI))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))))) (*.f32 alpha alpha)) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (+.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))))) (*.f32 alpha alpha))) (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))))) (*.f32 cosTheta cosTheta))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))))) (pow.f32 cosTheta #s(literal 4 binary32)))) (+.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))))) (*.f32 alpha alpha))) (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))))) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/.f32 alpha (log.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) alpha))))))
#s(approx (log (pow (pow alpha (PI)) 2)) (log.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (pow (pow alpha (PI)) 2) (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (pow alpha (PI)) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta))) alpha) (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) alpha))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (pow.f32 cosTheta #s(literal 4 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) alpha)) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) alpha)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (/.f32 #s(literal 1 binary32) (pow.f32 cosTheta #s(literal 4 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta)))) (/.f32 #s(literal 1 binary32) (*.f32 alpha (pow.f32 cosTheta #s(literal 4 binary32))))) alpha)) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) alpha)) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) alpha)))
#s(approx (- alpha 1) (*.f32 #s(literal -1 binary32) (*.f32 alpha (-.f32 (/.f32 #s(literal 1 binary32) alpha) #s(literal 1 binary32)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))) (/.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))) (/.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 cosTheta cosTheta))) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 cosTheta cosTheta)) (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))) (*.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 cosTheta cosTheta))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 #s(literal -2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha)) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 6 binary32))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha)) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 4 binary32)))))))))
#s(approx (log (pow (pow alpha (PI)) 2)) (*.f32 #s(literal -2 binary32) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))
#s(approx (log (* alpha alpha)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -2 binary32))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (fma.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 alpha alpha)) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 alpha alpha)))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (fma.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 alpha alpha)) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 alpha alpha)))
#s(approx (/ (- (+ (cosh (log (* alpha alpha))) (sinh (log (* alpha alpha)))) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (fma.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 8 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (fma.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 alpha alpha)) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (-.f32 (*.f32 alpha alpha) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) #s(literal 1 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))))) (*.f32 alpha alpha)))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 #s(literal -2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 alpha alpha))))))

eval186.0ms (0.2%)

Memory
0.1MiB live, 232.1MiB allocated; 26ms collecting garbage
Compiler

Compiled 114 796 to 5 444 computations (95.3% saved)

prune138.0ms (0.1%)

Memory
31.5MiB live, 213.6MiB allocated; 21ms collecting garbage
Pruning

10 alts after pruning (10 fresh and 0 done)

PrunedKeptTotal
New1 10871 115
Fresh235
Picked505
Done000
Total1 115101 125
Accuracy
100.0%
Counts
1 125 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶98.6%
(/.f32 (/.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
98.2%
(/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) #s(literal 1 binary32))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))))
98.2%
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta))))
▶98.2%
(/.f32 #s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
98.0%
(*.f32 (/.f32 (/.f32 (fma.f32 (*.f32 alpha alpha) alpha #s(literal 1 binary32)) (fma.f32 alpha alpha (-.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
▶98.3%
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
98.1%
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (PI.f32)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
▶95.7%
(*.f32 #s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha)))))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
98.3%
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
▶97.8%
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
Compiler

Compiled 2 402 to 598 computations (75.1% saved)

series456.0ms (0.5%)

Memory
25.6MiB live, 581.6MiB allocated; 172ms collecting garbage
Counts
94 → 636
Calls
Call 1
Inputs
(/.f32 (/.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(/.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha)))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32))
(-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(*.f32 alpha alpha)
alpha
#s(literal 1 binary32)
(PI.f32)
(log.f32 (*.f32 alpha alpha))
(fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))
(*.f32 cosTheta cosTheta)
cosTheta
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
(/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))))
(+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32)))
(pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32))
(*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))
(fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))
(/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))
(*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))
(pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))
(*.f32 alpha cosTheta)
#s(literal 2 binary32)
(-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))
(*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32)))
#s(literal 1/2 binary32)
(*.f32 (log.f32 alpha) (PI.f32))
(log.f32 alpha)
(/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))
(fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))
#s(literal -1 binary32)
(*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))
(/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32)))
#s(literal -1/2 binary32)
(/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))
(pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))
#s(literal 3 binary32)
(pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))
(*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))
(*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32)))
(+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))
(*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)))
(-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
(*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))
(*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))
(*.f32 #s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha)))))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha))))))
(*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha)))))
(+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha))))
(/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))))
(log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))
(exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))
(*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))
(*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))
(*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))
(-.f32 #s(literal 0 binary32) (log.f32 alpha))
#s(literal 0 binary32)
(/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha)))
(log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha))
(pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha)
(/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(-.f32 alpha #s(literal 1 binary32))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))
(+.f32 alpha #s(literal 1 binary32))
(log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))
(pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))
(pow.f32 alpha (PI.f32))
(/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32)))))
(-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32))
(*.f32 (*.f32 alpha alpha) alpha)
(fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))
(+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32)))
(*.f32 alpha #s(literal 1 binary32))
(/.f32 #s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
(*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))
(-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))
(/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))
(*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta)))
(*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))
(*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta)
(*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta)
(/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
(-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32))
(pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32))
(fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(neg.f32 (*.f32 alpha alpha))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
(*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
Outputs
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (PI) (log (pow alpha 2))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2)) (* (PI) (log (pow alpha 2))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 3)) (* (PI) (log (pow alpha 2)))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 4)) (* (PI) (log (pow alpha 2))))) (* -1 (/ (pow (- (pow alpha 2) 1) 3) (* (PI) (log (pow alpha 2))))))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 1))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))
#s(approx (* cosTheta cosTheta) #s(hole binary32 (pow cosTheta 2)))
#s(approx cosTheta #s(hole binary32 cosTheta))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (PI) (log (pow alpha 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2)) (* (PI) (log (pow alpha 2))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 3)) (* (PI) (log (pow alpha 2)))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 4)) (* (PI) (log (pow alpha 2))))) (* -1 (/ (pow (- (pow alpha 2) 1) 3) (* (PI) (log (pow alpha 2))))))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* (pow cosTheta 2) (- (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* (pow cosTheta 2) (- (+ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 2) (- (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* 3/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* (pow cosTheta 2) (- (+ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 2) (- (+ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (* 5/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (* 3/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* (pow alpha 6) (* (pow cosTheta 2) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* (pow cosTheta 2) (+ (* (pow alpha 6) (* (pow cosTheta 2) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha))))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* (pow cosTheta 2) (+ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 2) (+ (* (pow alpha 6) (* (pow cosTheta 2) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow alpha 2) (* (pow cosTheta 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (+ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))))) (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (+ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (pow cosTheta 2) (+ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))))) (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))))))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (* (pow cosTheta 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (* (pow cosTheta 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (+ (* 3/2 (/ 1 (* (PI) (log alpha)))) (* (pow cosTheta 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))))))) (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* 1/2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (* 2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* 1/2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha)))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (+ (* 3/2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha)))) (/ (pow alpha 2) (* (PI) (log alpha)))))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha)))))) (/ (pow alpha 2) (* (PI) (log alpha)))))))))
#s(approx (pow (* alpha cosTheta) 2) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (* alpha cosTheta) #s(hole binary32 (* alpha cosTheta)))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* 3/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 1))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (+ 1 (pow cosTheta 2))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (+ 1 (pow cosTheta 2))))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (+ 1 (* (pow cosTheta 2) (+ 1 (pow cosTheta 2))))))))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(hole binary32 1))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* (pow cosTheta 2) (- (* -1 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -3/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (pow cosTheta 2)))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (pow cosTheta 2) (+ 1 (* 2 (pow cosTheta 2))))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (pow cosTheta 2) (+ 1 (* (pow cosTheta 2) (+ 2 (* 3 (pow cosTheta 2))))))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (pow cosTheta 2) (+ 1 (* (pow cosTheta 2) (+ 2 (* (pow cosTheta 2) (+ 3 (* 4 (pow cosTheta 2))))))))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 1))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (+ 1 (* -2 (pow cosTheta 2)))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (pow cosTheta 2) 2)))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (/ -1/8 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (- (* -3/8 (/ (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (- (* (pow cosTheta 2) (- (* -3/4 (/ (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (- (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -5/4 (/ (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ -1/2 (* (PI) (log alpha)))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (- (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1 (* (PI) (log alpha)))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (/ 1 (* (PI) (log alpha))) (/ (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (/ 1 (* (PI) (log alpha))) (/ (pow cosTheta 2) (* (PI) (log alpha))))) (/ 1 (* (PI) (log alpha))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (/ 1 (* (PI) (log alpha))) (/ (pow cosTheta 2) (* (PI) (log alpha))))) (/ 1 (* (PI) (log alpha))))) (/ 1 (* (PI) (log alpha))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* (pow cosTheta 2) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* (pow cosTheta 2) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2)))) (* (pow cosTheta 2) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (+ (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (+ (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (+ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (+ (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2)))))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ 1/4 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (+ (* 1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* 3/4 (/ (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (+ (* -1/2 (* (pow cosTheta 2) (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (+ (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (+ (* -1/2 (* (pow cosTheta 2) (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (+ (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (+ (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 2) (+ (* -1/2 (* (pow cosTheta 2) (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (* (+ 1 alpha) (- alpha 1)) (log (pow (pow alpha (PI)) 2)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1)))) (log (pow (pow alpha (PI)) 2)))) (/ (* (+ 1 alpha) (- alpha 1)) (log (pow (pow alpha (PI)) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2)))) (log (pow (pow alpha (PI)) 2))) (/ (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1))) (log (pow (pow alpha (PI)) 2))))) (/ (* (+ 1 alpha) (- alpha 1)) (log (pow (pow alpha (PI)) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 3)))) (log (pow (pow alpha (PI)) 2)))) (* -1 (/ (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2))) (log (pow (pow alpha (PI)) 2)))))) (/ (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1))) (log (pow (pow alpha (PI)) 2))))) (/ (* (+ 1 alpha) (- alpha 1)) (log (pow (pow alpha (PI)) 2))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- alpha 1)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ alpha (* -1 (* (pow cosTheta 2) (* (- alpha 1) (- (pow alpha 2) 1))))) 1)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ alpha (* (pow cosTheta 2) (- (* (pow cosTheta 2) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2))) (* (- alpha 1) (- (pow alpha 2) 1))))) 1)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ alpha (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (* (pow cosTheta 2) (* (- alpha 1) (pow (- (pow alpha 2) 1) 3)))) (* -1 (* (- alpha 1) (pow (- (pow alpha 2) 1) 2))))) (* (- alpha 1) (- (pow alpha 2) 1))))) 1)))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- (pow alpha 2) 1) (- (pow alpha 3) 1)))) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2)))))) (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (pow (- (pow alpha 2) 1) 2) (- (pow alpha 3) 1)))) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2))))) (/ (* (+ 1 alpha) (* (- (pow alpha 2) 1) (- (pow alpha 3) 1))) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2))))))) (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (pow (- (pow alpha 2) 1) 3) (- (pow alpha 3) 1)))) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2)))))) (* -1 (/ (* (+ 1 alpha) (* (pow (- (pow alpha 2) 1) 2) (- (pow alpha 3) 1))) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2)))))))) (/ (* (+ 1 alpha) (* (- (pow alpha 2) 1) (- (pow alpha 3) 1))) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2))))))) (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2))))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (pow alpha 3) 1) (+ 1 (+ alpha (pow alpha 2))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (* (- (pow alpha 2) 1) (- (pow alpha 3) 1))) (+ 1 (+ alpha (pow alpha 2))))) (/ (pow alpha 3) (+ 1 (+ alpha (pow alpha 2))))) (/ 1 (+ 1 (+ alpha (pow alpha 2)))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (pow (- (pow alpha 2) 1) 2) (- (pow alpha 3) 1))) (+ 1 (+ alpha (pow alpha 2)))) (/ (* (- (pow alpha 2) 1) (- (pow alpha 3) 1)) (+ 1 (+ alpha (pow alpha 2)))))) (/ (pow alpha 3) (+ 1 (+ alpha (pow alpha 2))))) (/ 1 (+ 1 (+ alpha (pow alpha 2)))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (pow (- (pow alpha 2) 1) 3) (- (pow alpha 3) 1))) (+ 1 (+ alpha (pow alpha 2))))) (* -1 (/ (* (pow (- (pow alpha 2) 1) 2) (- (pow alpha 3) 1)) (+ 1 (+ alpha (pow alpha 2))))))) (/ (* (- (pow alpha 2) 1) (- (pow alpha 3) 1)) (+ 1 (+ alpha (pow alpha 2)))))) (/ (pow alpha 3) (+ 1 (+ alpha (pow alpha 2))))) (/ 1 (+ 1 (+ alpha (pow alpha 2)))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 6) 1) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 6) 1))) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))) (/ (pow alpha 6) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))) (/ 1 (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2) (- (pow alpha 6) 1))) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4)))))) (/ (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 6) 1)) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (/ (pow alpha 6) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))) (/ 1 (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3) (- (pow alpha 6) 1))) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))) (* -1 (/ (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2) (- (pow alpha 6) 1)) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))) (/ (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 6) 1)) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (/ (pow alpha 6) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))) (/ 1 (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (PI) (log (pow alpha 2)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* (PI) (log (pow alpha 2))) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 1))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (/ (* (pow cosTheta 2) (- (pow alpha 6) 1)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (/ (* cosTheta (- (pow alpha 6) 1)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3))))))) (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow cosTheta 2) (- (pow alpha 2) 1))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ 1 (pow cosTheta 2)) (pow alpha 2)) 1))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3))))))) (pow cosTheta 2))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (- (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ 3/2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* 2 (/ (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))) (pow cosTheta 2)))) (pow cosTheta 2))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (- (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 3 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (/ 3/2 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))) (pow cosTheta 2))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))) (pow cosTheta 4))) (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (- (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))))))) (pow cosTheta 4)))))) (pow cosTheta 2))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (- (+ (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (+ (* (pow alpha 6) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 3)) (* 5/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (pow cosTheta 6))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 3 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (/ 3/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))) (pow cosTheta 2))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))) (pow cosTheta 4))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (+ (* 2 (* (pow alpha 4) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))))) (pow cosTheta 6))) (+ (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (- (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))))))) (pow cosTheta 4))) (+ (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (- (* 3 (/ 1 (* (PI) (log alpha)))) (+ (* 2 (* (PI) (* (log alpha) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))))) (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (- (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))))))))))))) (pow cosTheta 6))) (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))))) (pow cosTheta 6))))))))) (pow cosTheta 2))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (/ 1/8 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (/ (+ (* 3/8 (/ 1 (* (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (pow cosTheta 6))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (/ (+ (/ 3/8 (* (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (/ 3/4 (* (pow cosTheta 4) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (pow cosTheta 6))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (/ (+ (/ 3/8 (* (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 3/4 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 3) (pow (log alpha) 3))))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (/ 5/4 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (/ (* (pow alpha 6) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 3)) (pow cosTheta 6)))))) (pow cosTheta 6))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (/ (* (pow alpha 6) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 3)) (pow cosTheta 12))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (/ (+ (* (pow alpha 6) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 3)) (/ (* (pow alpha 6) (+ (* 2 (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)))) (pow cosTheta 2))) (pow cosTheta 12))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (/ (+ (* (pow alpha 6) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 3)) (+ (/ (* (pow alpha 6) (+ (* 2 (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)))) (pow cosTheta 2)) (/ (* (pow alpha 6) (+ (* 2 (* (pow (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (+ (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)) (* (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (+ (* 2 (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) 2)))))) (pow cosTheta 4)))) (pow cosTheta 12))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (/ (+ (* (pow alpha 6) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 3)) (+ (/ (* (pow alpha 6) (+ (* 2 (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))) (+ (* (+ (* -1 (- (* -2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)) (+ (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) 2))) (* (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (+ (* 2 (* (+ (* -1 (- (* -2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 2 (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))))))))))) (pow cosTheta 6)) (+ (/ (* (pow alpha 6) (+ (* 2 (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)))) (pow cosTheta 2)) (/ (* (pow alpha 6) (+ (* 2 (* (pow (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (+ (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)) (* (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (+ (* 2 (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) 2)))))) (pow cosTheta 4))))) (pow cosTheta 12))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 4))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (/ (+ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (pow cosTheta 2))) (pow cosTheta 4))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (/ (+ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (+ (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 4)) (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (pow cosTheta 2)))) (pow cosTheta 4))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (/ (+ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (+ (/ (* (pow alpha 2) (+ (* -1 (- (* -2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 6)) (+ (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 4)) (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (pow cosTheta 2))))) (pow cosTheta 4))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (pow cosTheta 4))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 2))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))))) (pow cosTheta 4))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* -1 (/ (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (pow cosTheta 4))) (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 2))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha)))))))))) (pow cosTheta 4))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* -1 (/ (- (* -2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))) (pow cosTheta 6))) (+ (* -1 (/ (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (pow cosTheta 4))) (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 2))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (/ 2 (* (pow cosTheta 6) (* (PI) (log alpha))))))))))) (pow cosTheta 4))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha)))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (+ (* -1 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* 1/2 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 4))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (+ (* -3/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha))))) (+ (* -1 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 4))) (* 1/2 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))) (pow cosTheta 4))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (+ (* -2 (/ (pow alpha 2) (* (pow cosTheta 6) (* (PI) (log alpha))))) (+ (* -3/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha))))) (+ (* -1 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (+ (* -1 (/ (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (pow cosTheta 6))) (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 4))) (* 1/2 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))))) (pow cosTheta 4))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* 1/2 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 2))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (* 3/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha))))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (* 3/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha))))) (+ (* 2 (/ (pow alpha 2) (* (pow cosTheta 6) (* (PI) (log alpha))))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))) (pow cosTheta 2))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ 1/2 (* (pow cosTheta 4) (* (PI) (log alpha))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 4))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))) (/ 3/2 (* (pow cosTheta 4) (* (PI) (log alpha)))))) (pow cosTheta 4))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (* 2 (/ 1 (* (pow cosTheta 6) (* (PI) (log alpha)))))))) (pow cosTheta 4))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2)))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (pow cosTheta 2))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 4))) (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ -1 (pow cosTheta 2))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* -1 (/ (+ 1 (/ 1 (pow cosTheta 2))) (pow cosTheta 2)))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (* -1 (/ (+ 1 (/ 1 (pow cosTheta 2))) (pow cosTheta 2))) 1) (pow cosTheta 2))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (* -1 (/ (+ 1 (/ 1 (pow cosTheta 2))) (pow cosTheta 4))) (+ 1 (/ 1 (pow cosTheta 2)))) (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(hole binary32 (* -1 (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(hole binary32 (* (pow cosTheta 2) (- (/ 1 (pow cosTheta 2)) 1))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 2)))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (/ (- (* -1 (/ (+ (/ 1 (* (PI) (log alpha))) (* 3/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (pow cosTheta 2))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 4))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (/ 1 (pow cosTheta 2))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (/ (+ 1 (* 2 (/ 1 (pow cosTheta 2)))) (pow cosTheta 2))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (/ (+ 1 (+ (* 2 (/ 1 (pow cosTheta 2))) (/ 3 (pow cosTheta 4)))) (pow cosTheta 2))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (/ (+ 1 (+ (* 2 (/ 1 (pow cosTheta 2))) (+ (* 4 (/ 1 (pow cosTheta 6))) (/ 3 (pow cosTheta 4))))) (pow cosTheta 2))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (pow cosTheta 4)))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (* (pow cosTheta 4) (- 1 (* 2 (/ 1 (pow cosTheta 2)))))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (* (pow cosTheta 4) (- (+ 1 (/ 1 (pow cosTheta 4))) (* 2 (/ 1 (pow cosTheta 2)))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (/ 1/8 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (/ (+ (* 3/8 (/ 1 (* (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (pow cosTheta 6))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (/ (+ (/ 3/8 (* (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (/ 3/4 (* (pow cosTheta 4) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (pow cosTheta 6))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (/ (+ (/ 3/8 (* (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 3/4 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 3) (pow (log alpha) 3))))) (+ (* 5/4 (/ 1 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (pow cosTheta 6))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (/ 1/2 (* (pow cosTheta 4) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (pow cosTheta 6) (* (PI) (log alpha)))))))) (pow cosTheta 2))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ -1 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (* -1 (/ (+ (/ 1 (* (PI) (log alpha))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 2)))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ (- (* -1 (/ (+ (/ 1 (* (PI) (log alpha))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 2))) (/ 1 (* (PI) (log alpha)))) (pow cosTheta 2))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ (- (* -1 (/ (+ (/ 1 (* (PI) (log alpha))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 4))) (+ (/ 1 (* (PI) (log alpha))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (/ 1/4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (/ (- (+ (/ 1/2 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 4))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (/ (- (+ (/ 1/2 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 3/4 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)) (pow cosTheta 4))))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (pow cosTheta 4))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (* (PI) (log alpha))))))) (pow cosTheta 4))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (/ (- (+ (* 2 (/ (* (pow alpha 4) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow cosTheta 6))) (+ (/ 1/2 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 3/4 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (+ (/ 1 (* (pow cosTheta 6) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)) (pow cosTheta 4))))))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))) (pow cosTheta 6))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (pow cosTheta 4))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (* (PI) (log alpha)))))))) (pow cosTheta 4))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (/ (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)) (pow cosTheta 8))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (/ (+ (* 2 (/ (* (pow alpha 4) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow cosTheta 2))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (pow cosTheta 8))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (/ (+ (* 2 (/ (* (pow alpha 4) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow cosTheta 2))) (+ (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)) (/ (* (pow alpha 4) (+ (* 2 (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) 2))) (pow cosTheta 4)))) (pow cosTheta 8))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (/ (+ (* 2 (/ (* (pow alpha 4) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow cosTheta 2))) (+ (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)) (+ (/ (* (pow alpha 4) (+ (* 2 (* (+ (* -1 (- (* -2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 2 (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))))))) (pow cosTheta 6)) (/ (* (pow alpha 4) (+ (* 2 (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) 2))) (pow cosTheta 4))))) (pow cosTheta 8))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (/ 1/4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (/ (- (+ (/ 1/2 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 4))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (/ (- (+ (/ 1/2 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 3/4 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (pow cosTheta 4))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (* (PI) (log alpha))))))) (pow cosTheta 4))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (/ (- (+ (/ 1/2 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 3/4 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (+ (/ 1 (* (pow cosTheta 6) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))) (pow cosTheta 6))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (pow cosTheta 4))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (* (PI) (log alpha)))))))) (pow cosTheta 4))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ 1/4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))) (pow cosTheta 4))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (/ 3/4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (pow cosTheta 4))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 3/4 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (+ (/ 1 (* (pow cosTheta 6) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (pow cosTheta 4))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 6) (* (PI) (log alpha)))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (pow cosTheta 2))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (pow cosTheta 6))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))) (pow cosTheta 4))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (pow cosTheta 2))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))) (pow cosTheta 6))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))) (pow cosTheta 6))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))) (pow cosTheta 4))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (pow cosTheta 2))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))) (pow cosTheta 6))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (- (pow alpha 2) 1))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 2))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (log (pow (pow alpha (PI)) 2)) (- (pow alpha 2) 1)))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (/ (* (+ 1 alpha) (- alpha 1)) (* (log (pow (pow alpha (PI)) 2)) (- (pow alpha 2) 1))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 4) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 3))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 2))))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 6) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 4))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (log (pow (pow alpha (PI)) 2)) (- (pow alpha 2) 1)))) (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 4) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 3))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 2)))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- alpha 1) (* (pow cosTheta 2) (- (pow alpha 2) 1)))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))) (/ alpha (- (pow alpha 2) 1))) (+ (/ 1 (- (pow alpha 2) 1)) (/ alpha (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))) (+ (/ alpha (* (pow cosTheta 4) (pow (- (pow alpha 2) 1) 3))) (/ alpha (- (pow alpha 2) 1)))) (+ (/ 1 (* (pow cosTheta 4) (pow (- (pow alpha 2) 1) 3))) (+ (/ 1 (- (pow alpha 2) 1)) (/ alpha (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2)))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))) (+ (/ 1 (* (pow cosTheta 6) (pow (- (pow alpha 2) 1) 4))) (+ (/ alpha (* (pow cosTheta 4) (pow (- (pow alpha 2) 1) 3))) (/ alpha (- (pow alpha 2) 1))))) (+ (/ 1 (* (pow cosTheta 4) (pow (- (pow alpha 2) 1) 3))) (+ (/ 1 (- (pow alpha 2) 1)) (+ (/ alpha (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))) (/ alpha (* (pow cosTheta 6) (pow (- (pow alpha 2) 1) 4))))))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (+ (* -1 (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2)))))) (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1))))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1)))) (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (pow cosTheta 4) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 3)))))) (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2)))))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (pow cosTheta 6) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 4)))))) (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1))))) (+ (* -1 (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (pow cosTheta 4) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 3)))))) (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2))))))) (pow cosTheta 2))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (pow alpha 3) 1) (* (pow cosTheta 2) (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2)))) (/ (pow alpha 3) (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1)))) (+ (/ 1 (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1))) (/ (pow alpha 3) (* (pow cosTheta 2) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2)))))) (pow cosTheta 2))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2)))) (+ (/ (pow alpha 3) (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1))) (/ (pow alpha 3) (* (pow cosTheta 4) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 3)))))) (+ (/ 1 (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1))) (+ (/ 1 (* (pow cosTheta 4) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 3)))) (/ (pow alpha 3) (* (pow cosTheta 2) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2))))))) (pow cosTheta 2))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2)))) (+ (/ 1 (* (pow cosTheta 6) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 4)))) (+ (/ (pow alpha 3) (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1))) (/ (pow alpha 3) (* (pow cosTheta 4) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 3))))))) (+ (/ 1 (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1))) (+ (/ 1 (* (pow cosTheta 4) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 3)))) (+ (/ (pow alpha 3) (* (pow cosTheta 2) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2)))) (/ (pow alpha 3) (* (pow cosTheta 6) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 4)))))))) (pow cosTheta 2))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 6) 1) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2)))))) (/ (pow alpha 6) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))) (/ (pow alpha 6) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2)))))))) (pow cosTheta 2))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2)))))) (+ (/ (pow alpha 6) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))) (/ (pow alpha 6) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3)))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))) (+ (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3)))))) (/ (pow alpha 6) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))))))) (pow cosTheta 2))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2)))))) (+ (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 4)))))) (+ (/ (pow alpha 6) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))) (/ (pow alpha 6) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3))))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))) (+ (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3)))))) (+ (/ (pow alpha 6) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2)))))) (/ (pow alpha 6) (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 4)))))))))) (pow cosTheta 2))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (+ (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))) (/ (* (PI) (log (pow alpha 2))) (pow cosTheta 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ 1 (pow cosTheta 2)) (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) #s(hole binary32 (/ -1/2 (* (PI) (log alpha)))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) #s(hole binary32 (- (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (PI)) #s(hole binary32 (/ -1 (PI))))
#s(approx (/ (- (* alpha alpha) 1) (PI)) #s(hole binary32 (- (/ (pow alpha 2) (PI)) (/ 1 (PI)))))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 -1))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (- (pow alpha 2) 1)))
#s(approx (* alpha alpha) #s(hole binary32 (pow alpha 2)))
#s(approx alpha #s(hole binary32 alpha))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* 2 (log alpha))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))) (* 2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)))))))) (* -1 (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3))))) (+ (* -2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (* (+ (* -2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))) (* 2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)))))) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))) (+ (* 4 (* (pow cosTheta 2) (* (PI) (* (log alpha) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2))))) (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (* (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))))))) (+ (* -2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))) (* 2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)))))))) (* -1 (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (/ -1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (- (* (pow alpha 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (* 1/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (- (* (pow alpha 6) (+ (* (pow alpha 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3))) (* 1/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (- (* (pow alpha 6) (+ (* (pow alpha 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* (pow alpha 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3))) (* 1/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* (pow alpha 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* (pow alpha 2) (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3))) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (* (log alpha) (PI)) #s(hole binary32 (* (PI) (log alpha))))
#s(approx (log alpha) #s(hole binary32 (log alpha)))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))
#s(approx (/ -1/2 (* (log alpha) (PI))) #s(hole binary32 (/ -1/2 (* (PI) (log alpha)))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (/ -1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ 1 (* (log alpha) (PI))) #s(hole binary32 (/ 1 (* (PI) (log alpha)))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (/ 1/4 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (+ (* 1/2 (/ (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/4 (/ 1 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 2) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* -1/2 (/ (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))) (* 1/4 (/ 1 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 2) (- (+ (* -2 (/ (* (pow alpha 2) (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2))) (+ 1 (* -1 (pow cosTheta 2))))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* -1/2 (/ (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))) (* 1/4 (/ 1 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (* (pow alpha 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (* (pow alpha 4) (+ (* -2 (/ (* (pow alpha 2) (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2))) (+ 1 (* -1 (pow cosTheta 2))))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow alpha 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow alpha 2) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (/ 1/4 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (+ (* 1/2 (/ (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/4 (/ 1 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* -1/2 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* -1/2 (/ (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))) (* 1/4 (/ 1 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ 1/4 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* -1/2 (/ (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* (pow alpha 2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/2 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ -1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* (pow alpha 2) (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2)))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* (pow alpha 2) (- (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (* (pow cosTheta 2) (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (+ 1 (* -1 (pow cosTheta 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2)))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (/ 1 (log (pow (pow alpha (PI)) 2)))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (+ (/ 1 (log (pow (pow alpha (PI)) 2))) (/ alpha (log (pow (pow alpha (PI)) 2))))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) #s(hole binary32 (+ (* alpha (- (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/8 (/ (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) #s(hole binary32 (+ (* alpha (- (+ (* -1 (* alpha (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (* 1/8 (/ (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) #s(hole binary32 (+ (* alpha (- (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* alpha (+ (* -1 (* alpha (+ (* -1/4 (/ (* (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* -1/96 (/ (* (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2))))) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/96 (/ (+ (* -96 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* -64 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* -48 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* 16 (* (pow (PI) 4) (pow (log alpha) 4))) (* 192 (* (pow (PI) 4) (pow (log alpha) 4))))))) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* -1 (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 1/8 (/ (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) #s(hole binary32 (/ 1/2 (* alpha (* (PI) (log alpha))))))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) #s(hole binary32 (/ (+ (* alpha (- (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/8 (/ (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))) alpha)))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) #s(hole binary32 (/ (+ (* alpha (- (+ (* -1 (* alpha (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (* 1/8 (/ (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))) alpha)))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) #s(hole binary32 (/ (+ (* alpha (- (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* alpha (- (* -1 (* alpha (+ (* -1/4 (/ (* (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* -1/96 (/ (* (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2))))) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/96 (/ (+ (* -96 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* -64 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* -48 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* 16 (* (pow (PI) 4) (pow (log alpha) 4))) (* 192 (* (pow (PI) 4) (pow (log alpha) 4))))))) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* 1/8 (/ (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))) alpha)))
#s(approx (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) #s(hole binary32 (* 2 (* (PI) (log alpha)))))
#s(approx (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) #s(hole binary32 (exp (* 2 (* (PI) (log alpha))))))
#s(approx (* (* -1 (* (PI) (- 0 (log alpha)))) 2) #s(hole binary32 (* 2 (* (PI) (log alpha)))))
#s(approx (* -1 (* (PI) (- 0 (log alpha)))) #s(hole binary32 (* (PI) (log alpha))))
#s(approx (* (PI) (- 0 (log alpha))) #s(hole binary32 (* -1 (* (PI) (log alpha)))))
#s(approx (- 0 (log alpha)) #s(hole binary32 (* -1 (log alpha))))
#s(approx (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) #s(hole binary32 (/ 1/2 (* alpha (* (PI) (log alpha))))))
#s(approx (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) #s(hole binary32 (/ (+ (* -1/8 (/ (* alpha (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) alpha)))
#s(approx (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) #s(hole binary32 (/ (+ (* alpha (- (* -1 (* alpha (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 1/8 (/ (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))) alpha)))
#s(approx (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) #s(hole binary32 (/ (+ (* alpha (- (* alpha (- (* -1 (* alpha (+ (* -1/4 (/ (* (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* -1/96 (/ (* (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2))))) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/96 (/ (+ (* -96 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* -64 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* -48 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* 16 (* (pow (PI) 4) (pow (log alpha) 4))) (* 192 (* (pow (PI) 4) (pow (log alpha) 4))))))) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 1/8 (/ (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))) alpha)))
#s(approx (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) #s(hole binary32 (* 2 (* alpha (* (PI) (log alpha))))))
#s(approx (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) #s(hole binary32 (* alpha (+ (* 1/2 (* alpha (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 2 (* (PI) (log alpha)))))))
#s(approx (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) #s(hole binary32 (* alpha (+ (* 2 (* (PI) (log alpha))) (* alpha (+ (* 1/6 (* alpha (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))))) (* 1/2 (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) #s(hole binary32 (* alpha (+ (* 2 (* (PI) (log alpha))) (* alpha (+ (* 1/2 (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2))))) (* alpha (+ (* 1/24 (* alpha (+ (* -96 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* -64 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* -48 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* 16 (* (pow (PI) 4) (pow (log alpha) 4))) (* 192 (* (pow (PI) 4) (pow (log alpha) 4))))))))) (* 1/6 (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))))))))))))
#s(approx (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) #s(hole binary32 1))
#s(approx (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) #s(hole binary32 (+ 1 (* 2 (* alpha (* (PI) (log alpha)))))))
#s(approx (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) #s(hole binary32 (+ 1 (* alpha (+ (* 2 (* alpha (* (pow (PI) 2) (pow (log alpha) 2)))) (* 2 (* (PI) (log alpha))))))))
#s(approx (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) #s(hole binary32 (+ 1 (* alpha (+ (* 2 (* (PI) (log alpha))) (* alpha (+ (* 4/3 (* alpha (* (pow (PI) 3) (pow (log alpha) 3)))) (* 2 (* (pow (PI) 2) (pow (log alpha) 2))))))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ -1 (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (/ alpha (+ 1 (* -1 (pow cosTheta 2)))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* alpha (+ (/ 1 (+ 1 (* -1 (pow cosTheta 2)))) (/ (* alpha (pow cosTheta 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* alpha (+ (* alpha (- (* -1 (/ (* alpha (pow cosTheta 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (pow cosTheta 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (- alpha 1) #s(hole binary32 -1))
#s(approx (- alpha 1) #s(hole binary32 (- alpha 1)))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ -1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (/ (* (pow alpha 2) (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* (pow alpha 2) (- (* alpha (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (+ (* -2 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (/ 1 (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* (pow alpha 2) (- (* alpha (- (+ (* alpha (- (+ (* -2 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (/ 1 (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (+ (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ (pow (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -2 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (/ 1 (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (+ alpha 1) #s(hole binary32 1))
#s(approx (+ alpha 1) #s(hole binary32 (+ 1 alpha)))
#s(approx (log (pow (pow alpha (PI)) 2)) #s(hole binary32 (log (pow (pow alpha (PI)) 2))))
#s(approx (pow (pow alpha (PI)) 2) #s(hole binary32 (pow (pow alpha (PI)) 2)))
#s(approx (pow alpha (PI)) #s(hole binary32 (pow alpha (PI))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ -1 (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (/ alpha (+ 1 (* -1 (pow cosTheta 2)))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* alpha (+ (* -1 (* alpha (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ 1 (+ 1 (* -1 (pow cosTheta 2))))))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* alpha (+ (* alpha (- (* alpha (- (/ 1 (+ 1 (* -1 (pow cosTheta 2)))) (+ (* -2 (/ (pow cosTheta 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (+ (* -1 (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ 1 (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (pow cosTheta 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ 1 (+ 1 (* -1 (pow cosTheta 2))))))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) #s(hole binary32 -1))
#s(approx (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) #s(hole binary32 (- alpha 1)))
#s(approx (- (* (* alpha alpha) alpha) 1) #s(hole binary32 -1))
#s(approx (- (* (* alpha alpha) alpha) 1) #s(hole binary32 (- (pow alpha 3) 1)))
#s(approx (* (* alpha alpha) alpha) #s(hole binary32 (pow alpha 3)))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) #s(hole binary32 1))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) #s(hole binary32 (+ 1 alpha)))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) #s(hole binary32 (+ 1 (* alpha (+ 1 alpha)))))
#s(approx (+ 1 (* alpha 1)) #s(hole binary32 1))
#s(approx (+ 1 (* alpha 1)) #s(hole binary32 (+ 1 alpha)))
#s(approx (* alpha 1) #s(hole binary32 alpha))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* 1/2 (/ (* (pow alpha 2) (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1/2 (/ (+ 1 (+ (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ (pow (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))))) (* -1/2 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (+ (* -1 (/ (* (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1/2 (/ (+ 1 (+ (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ (pow (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))) (+ 1 (* -1 (pow cosTheta 2))))) (+ (* -1/2 (/ (+ (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (* 2 (pow cosTheta 2)))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ (* (+ 1 (+ (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))))) (+ (* -1/2 (/ (+ 1 (+ (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ (pow (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))))) (* -1/2 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 -1))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (- (pow alpha 2) 1)))
#s(approx (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) #s(hole binary32 -1))
#s(approx (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) #s(hole binary32 (- (pow alpha 2) 1)))
#s(approx (- 1 (/ 1 (* alpha alpha))) #s(hole binary32 (/ -1 (pow alpha 2))))
#s(approx (- 1 (/ 1 (* alpha alpha))) #s(hole binary32 (/ (- (pow alpha 2) 1) (pow alpha 2))))
#s(approx (/ 1 (* alpha alpha)) #s(hole binary32 (/ 1 (pow alpha 2))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* -2 (* (pow alpha 2) (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* -2 (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))))) (* 2 (* (pow alpha 2) (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))))))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* 2 (* (PI) (log alpha)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* -1 (pow cosTheta 2))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2)))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2)))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* -1 cosTheta)))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) cosTheta))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ cosTheta (* -1 cosTheta)))) (* -1 cosTheta))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ cosTheta (* -1 cosTheta))) (+ cosTheta (* -1 cosTheta)))) (* -1 cosTheta))))))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 -1))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (- (pow alpha 6) 1)))
#s(approx (pow (* alpha alpha) 3) #s(hole binary32 (pow alpha 6)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 1))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (+ 1 (pow alpha 2))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (+ 1 (* (pow alpha 2) (+ 1 (pow alpha 2))))))
#s(approx (neg (* alpha alpha)) #s(hole binary32 (* -1 (pow alpha 2))))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(hole binary32 1))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(hole binary32 (+ 1 (pow alpha 2))))
#s(approx (* (* alpha alpha) 1) #s(hole binary32 (pow alpha 2)))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) #s(hole binary32 (* (pow alpha 2) (- (* 1/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (- (* alpha alpha) 1) (PI)) #s(hole binary32 (/ (pow alpha 2) (PI))))
#s(approx (/ (- (* alpha alpha) 1) (PI)) #s(hole binary32 (* (pow alpha 2) (- (/ 1 (PI)) (/ 1 (* (pow alpha 2) (PI)))))))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (pow alpha 2)))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (* (pow alpha 2) (- 1 (/ 1 (pow alpha 2))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* -2 (log (/ 1 alpha)))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (+ (/ 1 (pow alpha 2)) (pow cosTheta 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))))) (* -2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) (pow alpha 2)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2)))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 4) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)))))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (* -2 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* -2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) (pow alpha 2))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2)))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 4) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))))))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (* -2 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (* -2 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))) (pow cosTheta 2))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))))) (* (pow alpha 6) (pow cosTheta 2)))) (+ (* -2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) (pow alpha 2))) (+ (* 1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* 1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow alpha 6) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))))) (+ (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (* (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (* -2 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (- (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (* (pow alpha 6) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)))))))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (/ (* (pow alpha 12) (* (pow cosTheta 6) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3))) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ (* (pow cosTheta 6) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 6) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* -1 (/ (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3) (pow alpha 6))) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 6) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (/ (* (pow alpha 12) (* (pow cosTheta 6) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3))) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ (* (pow cosTheta 6) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 6) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* -1 (/ (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3) (pow alpha 6))) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 6) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (/ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (* (pow alpha 4) (+ (* -1 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) (pow alpha 2))) (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (pow alpha 2))) (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* -1 (* (pow alpha 2) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (* -1 (+ (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ -1/2 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) #s(hole binary32 (/ -1/2 (* (PI) (log (/ 1 alpha))))))
#s(approx (* (log alpha) (PI)) #s(hole binary32 (* -1 (* (PI) (log (/ 1 alpha))))))
#s(approx (log alpha) #s(hole binary32 (* -1 (log (/ 1 alpha)))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))
#s(approx (/ -1/2 (* (log alpha) (PI))) #s(hole binary32 (/ 1/2 (* (PI) (log (/ 1 alpha))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (/ 1/8 (* (pow (PI) 3) (* (pow (log (/ 1 alpha)) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ 1/2 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ -1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ 1 (* (log alpha) (PI))) #s(hole binary32 (/ -1 (* (PI) (log (/ 1 alpha))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (/ (* (pow alpha 8) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (* (pow alpha 8) (+ (* -2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* -2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (pow alpha 4)))) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (pow alpha 4) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* -2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* 1/2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (pow alpha 6))) (+ (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (pow alpha 4))))) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (pow alpha 4) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (/ (* (pow alpha 8) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (* (pow alpha 8) (+ (* -2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (* (pow alpha 8) (+ (* -2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (pow alpha 4)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (* -1/2 (/ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (pow alpha 2))) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1/4 (* (pow alpha 4) (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (+ (* -1/2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (pow alpha 2))) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ 1/4 (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* 1/2 (/ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* (pow alpha 4) (+ (* -1/2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (pow alpha 2))) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))) (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (/ 1 (* (pow alpha 4) (* (pow cosTheta 6) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (+ (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (/ 1 (* (pow alpha 4) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (* -1 (/ (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (* (pow alpha 6) (* (pow cosTheta 8) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (+ (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 4) (* (pow cosTheta 6) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))) (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (/ alpha (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (* alpha (+ (/ 1 (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))) (/ 1 (* alpha (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) #s(hole binary32 (* alpha (- (* 1/2 (/ 1 (* alpha (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) #s(hole binary32 (- (* 1/2 (/ 1 (* alpha (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))))))
#s(approx (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) #s(hole binary32 (/ -1/2 (* (PI) (log (/ 1 alpha))))))
#s(approx (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) #s(hole binary32 (* -2 (* (PI) (log (/ 1 alpha))))))
#s(approx (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) #s(hole binary32 (exp (* -2 (* (PI) (log (/ 1 alpha)))))))
#s(approx (* (* -1 (* (PI) (- 0 (log alpha)))) 2) #s(hole binary32 (* -2 (* (PI) (log (/ 1 alpha))))))
#s(approx (* -1 (* (PI) (- 0 (log alpha)))) #s(hole binary32 (* -1 (* (PI) (log (/ 1 alpha))))))
#s(approx (* (PI) (- 0 (log alpha))) #s(hole binary32 (* (PI) (log (/ 1 alpha)))))
#s(approx (- 0 (log alpha)) #s(hole binary32 (log (/ 1 alpha))))
#s(approx (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) #s(hole binary32 (exp (* 2 (* alpha (* (PI) (log alpha)))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ 1 (* alpha (pow cosTheta 2)))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (/ 1 (pow cosTheta 2)) (/ 1 (* alpha (pow cosTheta 2)))) alpha)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow alpha 2) (pow cosTheta 2))) (/ 1 (pow cosTheta 2))) (+ (/ 1 (* alpha (pow cosTheta 2))) (/ 1 (* (pow alpha 2) (pow cosTheta 4))))) alpha)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow alpha 2) (pow cosTheta 2))) (+ (/ 1 (* (pow alpha 3) (pow cosTheta 4))) (/ 1 (pow cosTheta 2)))) (+ (/ 1 (* alpha (pow cosTheta 2))) (+ (/ 1 (* (pow alpha 2) (pow cosTheta 4))) (/ 1 (* (pow alpha 3) (pow cosTheta 2)))))) alpha)))
#s(approx (- alpha 1) #s(hole binary32 alpha))
#s(approx (- alpha 1) #s(hole binary32 (* alpha (- 1 (/ 1 alpha)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))) (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (* -1 (/ (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (pow cosTheta 6) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (/ 1 (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (pow alpha 4))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (pow cosTheta 6) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (/ 1 (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 6) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))) (pow alpha 5))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (pow alpha 4) (* (pow cosTheta 6) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))) (+ (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (/ 1 (* (pow alpha 4) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))))))
#s(approx (+ alpha 1) #s(hole binary32 alpha))
#s(approx (+ alpha 1) #s(hole binary32 (* alpha (+ 1 (/ 1 alpha)))))
#s(approx (log (pow (pow alpha (PI)) 2)) #s(hole binary32 (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))
#s(approx (pow (pow alpha (PI)) 2) #s(hole binary32 (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))
#s(approx (pow alpha (PI)) #s(hole binary32 (exp (* -1 (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ 1 (* alpha (pow cosTheta 2)))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (/ 1 (pow cosTheta 2)) (/ 1 (* alpha (pow cosTheta 2)))) alpha)))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow alpha 2) (pow cosTheta 2))) (/ 1 (pow cosTheta 2))) (+ (/ 1 (* alpha (pow cosTheta 2))) (/ 1 (* (pow alpha 2) (pow cosTheta 4))))) alpha)))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (* -1 (/ (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (pow cosTheta 4))) (/ 1 (pow cosTheta 2))) (pow alpha 3))) (+ (/ 1 (* (pow alpha 2) (pow cosTheta 2))) (/ 1 (pow cosTheta 2)))) (+ (/ 1 (* alpha (pow cosTheta 2))) (/ 1 (* (pow alpha 2) (pow cosTheta 4))))) alpha)))
#s(approx (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) #s(hole binary32 alpha))
#s(approx (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) #s(hole binary32 (* alpha (- 1 (/ 1 alpha)))))
#s(approx (- (* (* alpha alpha) alpha) 1) #s(hole binary32 (pow alpha 3)))
#s(approx (- (* (* alpha alpha) alpha) 1) #s(hole binary32 (* (pow alpha 3) (- 1 (/ 1 (pow alpha 3))))))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) #s(hole binary32 (pow alpha 2)))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) #s(hole binary32 (* (pow alpha 2) (+ 1 (/ 1 alpha)))))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) #s(hole binary32 (* (pow alpha 2) (+ 1 (+ (/ 1 alpha) (/ 1 (pow alpha 2)))))))
#s(approx (+ 1 (* alpha 1)) #s(hole binary32 alpha))
#s(approx (+ 1 (* alpha 1)) #s(hole binary32 (* alpha (+ 1 (/ 1 alpha)))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* 1/2 (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* -1/2 (/ (+ 1 (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 6) (* (PI) (log (/ 1 alpha))))))) (pow alpha 4))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))) (/ 1/2 (* (pow alpha 6) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1 (/ (+ (* -1/2 (/ (+ 1 (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 6) (* (PI) (log (/ 1 alpha))))))) (* (pow alpha 6) (pow cosTheta 2)))) (+ (* -1/2 (/ (+ 1 (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (pow alpha 4) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (+ 1 (+ (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* -1 (pow cosTheta 2)))) (* (pow alpha 6) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ (+ 1 (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (pow alpha 6) (* (pow cosTheta 6) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (pow cosTheta 6) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (pow alpha 2)))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (* (pow alpha 2) (- 1 (/ 1 (pow alpha 2))))))
#s(approx (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) #s(hole binary32 (pow alpha 2)))
#s(approx (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) #s(hole binary32 (* (pow alpha 2) (- 1 (/ 1 (pow alpha 2))))))
#s(approx (- 1 (/ 1 (* alpha alpha))) #s(hole binary32 1))
#s(approx (- 1 (/ 1 (* alpha alpha))) #s(hole binary32 (- 1 (/ 1 (pow alpha 2)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 6))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4)))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* -2 (* (PI) (log (/ 1 alpha))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (/ 1 (pow alpha 2)) (pow cosTheta 2)) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (pow alpha 4))) (+ (/ 1 (pow alpha 2)) (pow cosTheta 2))) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (pow cosTheta 2) (pow alpha 6))) (+ (/ 1 (pow alpha 2)) (+ (/ (pow cosTheta 2) (pow alpha 6)) (pow cosTheta 2)))) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 4))) (+ (/ (pow cosTheta 2) (pow alpha 2)) (/ (pow cosTheta 2) (pow alpha 4))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (pow cosTheta 2)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (pow alpha 4))) (pow cosTheta 2)) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (pow cosTheta 2) (pow alpha 6))) (+ (/ (pow cosTheta 2) (pow alpha 6)) (pow cosTheta 2))) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 4))) (+ (/ (pow cosTheta 2) (pow alpha 2)) (/ (pow cosTheta 2) (pow alpha 4))))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) cosTheta)))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ cosTheta (* -1 (/ cosTheta (pow alpha 2)))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ cosTheta (* -1 (/ (+ cosTheta (* -1 cosTheta)) (pow alpha 4)))) (/ cosTheta (pow alpha 2))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ cosTheta (+ (* -1 (/ cosTheta (pow alpha 6))) (/ cosTheta (pow alpha 6)))) (+ (* -1 (/ cosTheta (pow alpha 4))) (+ (/ cosTheta (pow alpha 2)) (/ cosTheta (pow alpha 4))))))))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (pow alpha 6)))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (* (pow alpha 6) (- 1 (/ 1 (pow alpha 6))))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (pow alpha 4)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (* (pow alpha 4) (+ 1 (/ 1 (pow alpha 2))))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (* (pow alpha 4) (+ 1 (+ (/ 1 (pow alpha 2)) (/ 1 (pow alpha 4)))))))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(hole binary32 (pow alpha 2)))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(hole binary32 (* (pow alpha 2) (+ 1 (/ 1 (pow alpha 2))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) #s(hole binary32 (* (pow alpha 2) (- (* 1/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ -1 alpha)))))) (* 1/2 (/ 1 (* (PI) (log (/ -1 alpha)))))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* -2 (log (/ -1 alpha)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* -1 (/ (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))))) (* 2 (/ (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 4) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (* 2 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))) (* 2 (/ (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 4) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow alpha 6) (pow cosTheta 4)))))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (* 2 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))) (pow cosTheta 2))) (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))))) (* (pow alpha 6) (pow cosTheta 2)))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (* 2 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))) (+ (* -1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* -1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))) (* (pow alpha 6) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))) (+ (* 2 (/ (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (* (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (* 2 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* (pow alpha 6) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))))))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (* -1 (/ (* (pow alpha 12) (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3))) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (* (pow alpha 12) (+ (* -1 (/ (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -1 (/ (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -1 (/ (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3) (pow alpha 6))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* -1 (/ (* (pow alpha 12) (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3))) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 12) (+ (* -1 (/ (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -1 (/ (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -1 (/ (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3) (pow alpha 6))))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (* -1 (/ (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ 1/2 (* (pow alpha 2) (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* -1/2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ 1/2 (* (pow alpha 2) (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* -1/2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1/2 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) #s(hole binary32 (/ 1/2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (* (log alpha) (PI)) #s(hole binary32 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))
#s(approx (log alpha) #s(hole binary32 (+ (log -1) (* -1 (log (/ -1 alpha))))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (/ -1/2 (* (log alpha) (PI))) #s(hole binary32 (/ -1/2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (/ -1/8 (* (pow (PI) 3) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ -1/2 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ 1 (* (log alpha) (PI))) #s(hole binary32 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (/ (* (pow alpha 8) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (* (pow alpha 8) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (pow alpha 4)))) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow alpha 4) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* 1/2 (/ (- (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* -1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))) (pow alpha 6))) (+ (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (pow alpha 4))))) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow alpha 4) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (/ (* (pow alpha 8) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (* (pow alpha 8) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (* (pow alpha 8) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (pow alpha 4)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (* -1/2 (/ (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/2 (/ (- (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* -1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))) (pow alpha 2))) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1/4 (* (pow alpha 4) (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* -1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))) (pow alpha 2))) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ 1/4 (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* 1/2 (/ (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* (pow alpha 4) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* -1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))) (pow alpha 2))) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (pow alpha 2))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (pow alpha 2))) (+ (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))) (* (pow alpha 4) (pow cosTheta 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1 (/ (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (pow alpha 2))) (+ (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (/ alpha (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (* alpha (+ (/ 1 (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))) (/ 1 (* alpha (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) #s(hole binary32 (* alpha (+ (* 1/2 (/ 1 (* alpha (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) #s(hole binary32 (+ (* 1/2 (/ 1 (* alpha (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) #s(hole binary32 (/ 1/2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) #s(hole binary32 (* 2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) #s(hole binary32 (exp (* 2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* (* -1 (* (PI) (- 0 (log alpha)))) 2) #s(hole binary32 (* 2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (* -1 (* (PI) (- 0 (log alpha)))) #s(hole binary32 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))
#s(approx (* (PI) (- 0 (log alpha))) #s(hole binary32 (* -1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (- 0 (log alpha)) #s(hole binary32 (* -1 (+ (log -1) (* -1 (log (/ -1 alpha)))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (/ 1 (* alpha (pow cosTheta 2))) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (/ 1 (* alpha (pow cosTheta 2))) (+ (/ 1 (* alpha (pow cosTheta 4))) (/ 1 (pow cosTheta 2)))) alpha)) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (- (/ 1 (pow cosTheta 2)) (/ 1 (pow cosTheta 4)))) (/ 1 (* alpha (pow cosTheta 2)))) (/ 1 (* alpha (pow cosTheta 4)))) alpha)) (/ 1 (pow cosTheta 2))) alpha)) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (- alpha 1) #s(hole binary32 (* -1 (* alpha (- (/ 1 alpha) 1)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (+ (* -1 (/ (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))) (/ 1 (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))) (pow alpha 3))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (+ (* -1 (/ (- (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))) (+ (/ 1 (* alpha (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))) (/ 1 (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (+ (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* alpha (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* alpha (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (+ (/ 1 (* alpha (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))) (/ (pow (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) 2) (* alpha (* (pow cosTheta 6) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))))) (pow alpha 3))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))))
#s(approx (log (pow (pow alpha (PI)) 2)) #s(hole binary32 (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))
#s(approx (pow (pow alpha (PI)) 2) #s(hole binary32 (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))
#s(approx (pow alpha (PI)) #s(hole binary32 (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (/ 1 (* alpha (pow cosTheta 2))) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (/ 1 (* alpha (pow cosTheta 2))) (+ (/ 1 (* alpha (pow cosTheta 4))) (/ 1 (pow cosTheta 2)))) alpha)) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (- (/ 1 (pow cosTheta 2)) (/ 1 (pow cosTheta 4)))) (/ 1 (* alpha (pow cosTheta 2)))) (+ (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* alpha (pow cosTheta 4)))) (+ (* -1 (/ (- (/ 1 (pow cosTheta 2)) (/ 1 (pow cosTheta 4))) alpha)) (/ 1 (* alpha (pow cosTheta 4)))))) alpha)) (/ 1 (pow cosTheta 2))) alpha)) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) #s(hole binary32 (* -1 (* alpha (- (/ 1 alpha) 1)))))
#s(approx (- (* (* alpha alpha) alpha) 1) #s(hole binary32 (* -1 (* (pow alpha 3) (- (/ 1 (pow alpha 3)) 1)))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* 1/2 (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* -1/2 (/ (+ 1 (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 6) (* (PI) (log (/ -1 alpha))))))) (pow alpha 4))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (/ 1/2 (* (pow alpha 6) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1 (/ (+ (* -1/2 (/ (+ 1 (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 6) (* (PI) (log (/ -1 alpha))))))) (* (pow alpha 6) (pow cosTheta 2)))) (+ (* -1/2 (/ (+ 1 (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (pow alpha 4) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (+ 1 (+ (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* -1 (pow cosTheta 2)))) (* (pow alpha 6) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ (+ 1 (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (pow alpha 6) (* (pow cosTheta 6) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (pow cosTheta 6) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 6))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4)))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* -2 (* (PI) (log (/ -1 alpha))))))
Calls

6 calls:

TimeVariablePointExpression
105.0ms
alpha
@0
((/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (/ (- (* alpha alpha) 1) (PI)) (- (* alpha alpha) 1) (* alpha alpha) alpha 1 (PI) (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (* cosTheta cosTheta) cosTheta (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (pow (* alpha cosTheta) 2) (* alpha cosTheta) 2 (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1/2 (* (log alpha) (PI))) 1/2 (* (log alpha) (PI)) (log alpha) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (+ (* (* cosTheta cosTheta) -1) 1) -1 (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (/ -1/2 (* (log alpha) (PI))) -1/2 (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) 3 (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1 (* (log alpha) (PI))) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) (* (* -1 (* (PI) (- 0 (log alpha)))) 2) (* -1 (* (PI) (- 0 (log alpha)))) (* (PI) (- 0 (log alpha))) (- 0 (log alpha)) 0 (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (- alpha 1) (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (+ alpha 1) (log (pow (pow alpha (PI)) 2)) (pow (pow alpha (PI)) 2) (pow alpha (PI)) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (- (* (* alpha alpha) alpha) 1) (* (* alpha alpha) alpha) (+ (* alpha alpha) (+ 1 (* alpha 1))) (+ 1 (* alpha 1)) (* alpha 1) (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) (- 1 (/ 1 (* alpha alpha))) (/ 1 (* alpha alpha)) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (- (pow (* alpha alpha) 3) 1) (pow (* alpha alpha) 3) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (neg (* alpha alpha)) (+ 1 (* (* alpha alpha) 1)) (* (* alpha alpha) 1))
90.0ms
alpha
@-inf
((/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (/ (- (* alpha alpha) 1) (PI)) (- (* alpha alpha) 1) (* alpha alpha) alpha 1 (PI) (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (* cosTheta cosTheta) cosTheta (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (pow (* alpha cosTheta) 2) (* alpha cosTheta) 2 (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1/2 (* (log alpha) (PI))) 1/2 (* (log alpha) (PI)) (log alpha) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (+ (* (* cosTheta cosTheta) -1) 1) -1 (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (/ -1/2 (* (log alpha) (PI))) -1/2 (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) 3 (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1 (* (log alpha) (PI))) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) (* (* -1 (* (PI) (- 0 (log alpha)))) 2) (* -1 (* (PI) (- 0 (log alpha)))) (* (PI) (- 0 (log alpha))) (- 0 (log alpha)) 0 (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (- alpha 1) (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (+ alpha 1) (log (pow (pow alpha (PI)) 2)) (pow (pow alpha (PI)) 2) (pow alpha (PI)) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (- (* (* alpha alpha) alpha) 1) (* (* alpha alpha) alpha) (+ (* alpha alpha) (+ 1 (* alpha 1))) (+ 1 (* alpha 1)) (* alpha 1) (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) (- 1 (/ 1 (* alpha alpha))) (/ 1 (* alpha alpha)) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (- (pow (* alpha alpha) 3) 1) (pow (* alpha alpha) 3) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (neg (* alpha alpha)) (+ 1 (* (* alpha alpha) 1)) (* (* alpha alpha) 1))
85.0ms
alpha
@inf
((/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (/ (- (* alpha alpha) 1) (PI)) (- (* alpha alpha) 1) (* alpha alpha) alpha 1 (PI) (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (* cosTheta cosTheta) cosTheta (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (pow (* alpha cosTheta) 2) (* alpha cosTheta) 2 (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1/2 (* (log alpha) (PI))) 1/2 (* (log alpha) (PI)) (log alpha) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (+ (* (* cosTheta cosTheta) -1) 1) -1 (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (/ -1/2 (* (log alpha) (PI))) -1/2 (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) 3 (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1 (* (log alpha) (PI))) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) (* (* -1 (* (PI) (- 0 (log alpha)))) 2) (* -1 (* (PI) (- 0 (log alpha)))) (* (PI) (- 0 (log alpha))) (- 0 (log alpha)) 0 (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (- alpha 1) (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (+ alpha 1) (log (pow (pow alpha (PI)) 2)) (pow (pow alpha (PI)) 2) (pow alpha (PI)) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (- (* (* alpha alpha) alpha) 1) (* (* alpha alpha) alpha) (+ (* alpha alpha) (+ 1 (* alpha 1))) (+ 1 (* alpha 1)) (* alpha 1) (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) (- 1 (/ 1 (* alpha alpha))) (/ 1 (* alpha alpha)) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (- (pow (* alpha alpha) 3) 1) (pow (* alpha alpha) 3) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (neg (* alpha alpha)) (+ 1 (* (* alpha alpha) 1)) (* (* alpha alpha) 1))
46.0ms
cosTheta
@0
((/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (/ (- (* alpha alpha) 1) (PI)) (- (* alpha alpha) 1) (* alpha alpha) alpha 1 (PI) (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (* cosTheta cosTheta) cosTheta (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (pow (* alpha cosTheta) 2) (* alpha cosTheta) 2 (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1/2 (* (log alpha) (PI))) 1/2 (* (log alpha) (PI)) (log alpha) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (+ (* (* cosTheta cosTheta) -1) 1) -1 (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (/ -1/2 (* (log alpha) (PI))) -1/2 (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) 3 (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1 (* (log alpha) (PI))) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) (* (* -1 (* (PI) (- 0 (log alpha)))) 2) (* -1 (* (PI) (- 0 (log alpha)))) (* (PI) (- 0 (log alpha))) (- 0 (log alpha)) 0 (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (- alpha 1) (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (+ alpha 1) (log (pow (pow alpha (PI)) 2)) (pow (pow alpha (PI)) 2) (pow alpha (PI)) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (- (* (* alpha alpha) alpha) 1) (* (* alpha alpha) alpha) (+ (* alpha alpha) (+ 1 (* alpha 1))) (+ 1 (* alpha 1)) (* alpha 1) (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) (- 1 (/ 1 (* alpha alpha))) (/ 1 (* alpha alpha)) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (- (pow (* alpha alpha) 3) 1) (pow (* alpha alpha) 3) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (neg (* alpha alpha)) (+ 1 (* (* alpha alpha) 1)) (* (* alpha alpha) 1))
36.0ms
cosTheta
@inf
((/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (/ (- (* alpha alpha) 1) (PI)) (- (* alpha alpha) 1) (* alpha alpha) alpha 1 (PI) (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (* cosTheta cosTheta) cosTheta (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (pow (* alpha cosTheta) 2) (* alpha cosTheta) 2 (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1/2 (* (log alpha) (PI))) 1/2 (* (log alpha) (PI)) (log alpha) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (+ (* (* cosTheta cosTheta) -1) 1) -1 (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (/ -1/2 (* (log alpha) (PI))) -1/2 (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) 3 (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/ 1 (* (log alpha) (PI))) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) (* (* -1 (* (PI) (- 0 (log alpha)))) 2) (* -1 (* (PI) (- 0 (log alpha)))) (* (PI) (- 0 (log alpha))) (- 0 (log alpha)) 0 (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (- alpha 1) (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (+ alpha 1) (log (pow (pow alpha (PI)) 2)) (pow (pow alpha (PI)) 2) (pow alpha (PI)) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (- (* (* alpha alpha) alpha) 1) (* (* alpha alpha) alpha) (+ (* alpha alpha) (+ 1 (* alpha 1))) (+ 1 (* alpha 1)) (* alpha 1) (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) (- 1 (/ 1 (* alpha alpha))) (/ 1 (* alpha alpha)) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (- (pow (* alpha alpha) 3) 1) (pow (* alpha alpha) 3) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (neg (* alpha alpha)) (+ 1 (* (* alpha alpha) 1)) (* (* alpha alpha) 1))

rewrite595.0ms (0.6%)

Memory
33.3MiB live, 820.1MiB allocated; 159ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0340298037
0360387153
01084185806
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
730 → 855
Calls
Call 1
Inputs
(/.f32 (/.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(/.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha)))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32))
(-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(*.f32 alpha alpha)
alpha
#s(literal 1 binary32)
(PI.f32)
(log.f32 (*.f32 alpha alpha))
(fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))
(*.f32 cosTheta cosTheta)
cosTheta
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
(/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))))
(+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32)))
(pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32))
(*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))
(fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))
(/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))
(*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))
(pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))
(*.f32 alpha cosTheta)
#s(literal 2 binary32)
(-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))
(*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32)))
#s(literal 1/2 binary32)
(*.f32 (log.f32 alpha) (PI.f32))
(log.f32 alpha)
(/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))
(fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))
#s(literal -1 binary32)
(*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))
(/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32)))
#s(literal -1/2 binary32)
(/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))
(pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))
#s(literal 3 binary32)
(pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))
(*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))
(*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32)))
(+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))
(*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)))
(-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
(*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))
(*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))
(*.f32 #s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha)))))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha))))))
(*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha)))))
(+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha))))
(/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))))
(log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))
(exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))
(*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))
(*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))
(*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))
(-.f32 #s(literal 0 binary32) (log.f32 alpha))
#s(literal 0 binary32)
(/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha)))
(log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha))
(pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha)
(/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(-.f32 alpha #s(literal 1 binary32))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))
(+.f32 alpha #s(literal 1 binary32))
(log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))
(pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))
(pow.f32 alpha (PI.f32))
(/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32)))))
(-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32))
(*.f32 (*.f32 alpha alpha) alpha)
(fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))
(+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32)))
(*.f32 alpha #s(literal 1 binary32))
(/.f32 #s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
(*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))
(-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))
(/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))
(*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta)))
(*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))
(*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta)
(*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta)
(/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
(-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32))
(pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32))
(fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(neg.f32 (*.f32 alpha alpha))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
(*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (PI) (log (pow alpha 2))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2)) (* (PI) (log (pow alpha 2))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 3)) (* (PI) (log (pow alpha 2)))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 4)) (* (PI) (log (pow alpha 2))))) (* -1 (/ (pow (- (pow alpha 2) 1) 3) (* (PI) (log (pow alpha 2))))))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 1))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))
#s(approx (* cosTheta cosTheta) #s(hole binary32 (pow cosTheta 2)))
#s(approx cosTheta #s(hole binary32 cosTheta))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (PI) (log (pow alpha 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2)) (* (PI) (log (pow alpha 2))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 3)) (* (PI) (log (pow alpha 2)))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 4)) (* (PI) (log (pow alpha 2))))) (* -1 (/ (pow (- (pow alpha 2) 1) 3) (* (PI) (log (pow alpha 2))))))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* (pow cosTheta 2) (- (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* (pow cosTheta 2) (- (+ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 2) (- (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* 3/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* (pow cosTheta 2) (- (+ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 2) (- (+ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (* 5/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (* 3/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* (pow alpha 6) (* (pow cosTheta 2) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* (pow cosTheta 2) (+ (* (pow alpha 6) (* (pow cosTheta 2) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha))))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* (pow cosTheta 2) (+ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 2) (+ (* (pow alpha 6) (* (pow cosTheta 2) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow alpha 2) (* (pow cosTheta 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (+ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))))) (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (+ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (pow cosTheta 2) (+ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))))) (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))))))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (* (pow cosTheta 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (* (pow cosTheta 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (+ (* 3/2 (/ 1 (* (PI) (log alpha)))) (* (pow cosTheta 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))))))) (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* 1/2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (* 2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* 1/2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha)))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (+ (* 3/2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha)))) (/ (pow alpha 2) (* (PI) (log alpha)))))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow cosTheta 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha)))))) (/ (pow alpha 2) (* (PI) (log alpha)))))))))
#s(approx (pow (* alpha cosTheta) 2) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (* alpha cosTheta) #s(hole binary32 (* alpha cosTheta)))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* 3/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 1))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (+ 1 (pow cosTheta 2))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (+ 1 (pow cosTheta 2))))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (+ 1 (* (pow cosTheta 2) (+ 1 (pow cosTheta 2))))))))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(hole binary32 1))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* (pow cosTheta 2) (- (* -1 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -3/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (pow cosTheta 2)))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (pow cosTheta 2) (+ 1 (* 2 (pow cosTheta 2))))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (pow cosTheta 2) (+ 1 (* (pow cosTheta 2) (+ 2 (* 3 (pow cosTheta 2))))))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (* (pow cosTheta 2) (+ 1 (* (pow cosTheta 2) (+ 2 (* (pow cosTheta 2) (+ 3 (* 4 (pow cosTheta 2))))))))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 1))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (+ 1 (* -2 (pow cosTheta 2)))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (pow cosTheta 2) 2)))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (/ -1/8 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (- (* -3/8 (/ (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (- (* (pow cosTheta 2) (- (* -3/4 (/ (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (- (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -5/4 (/ (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ -1/2 (* (PI) (log alpha)))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (- (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1 (* (PI) (log alpha)))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (/ 1 (* (PI) (log alpha))) (/ (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (/ 1 (* (PI) (log alpha))) (/ (pow cosTheta 2) (* (PI) (log alpha))))) (/ 1 (* (PI) (log alpha))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (/ 1 (* (PI) (log alpha))) (/ (pow cosTheta 2) (* (PI) (log alpha))))) (/ 1 (* (PI) (log alpha))))) (/ 1 (* (PI) (log alpha))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* (pow cosTheta 2) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* (pow cosTheta 2) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2)))) (* (pow cosTheta 2) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (+ (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (+ (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (+ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (+ (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2)))))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (- (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ 1/4 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (+ (* 1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* 3/4 (/ (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (+ (* -1/2 (* (pow cosTheta 2) (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (+ (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (+ (* -1/2 (* (pow cosTheta 2) (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (+ (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow cosTheta 2) (+ (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 2) (+ (* -1/2 (* (pow cosTheta 2) (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (* (+ 1 alpha) (- alpha 1)) (log (pow (pow alpha (PI)) 2)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1)))) (log (pow (pow alpha (PI)) 2)))) (/ (* (+ 1 alpha) (- alpha 1)) (log (pow (pow alpha (PI)) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2)))) (log (pow (pow alpha (PI)) 2))) (/ (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1))) (log (pow (pow alpha (PI)) 2))))) (/ (* (+ 1 alpha) (- alpha 1)) (log (pow (pow alpha (PI)) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 3)))) (log (pow (pow alpha (PI)) 2)))) (* -1 (/ (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2))) (log (pow (pow alpha (PI)) 2)))))) (/ (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1))) (log (pow (pow alpha (PI)) 2))))) (/ (* (+ 1 alpha) (- alpha 1)) (log (pow (pow alpha (PI)) 2))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- alpha 1)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ alpha (* -1 (* (pow cosTheta 2) (* (- alpha 1) (- (pow alpha 2) 1))))) 1)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ alpha (* (pow cosTheta 2) (- (* (pow cosTheta 2) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2))) (* (- alpha 1) (- (pow alpha 2) 1))))) 1)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ alpha (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (* (pow cosTheta 2) (* (- alpha 1) (pow (- (pow alpha 2) 1) 3)))) (* -1 (* (- alpha 1) (pow (- (pow alpha 2) 1) 2))))) (* (- alpha 1) (- (pow alpha 2) 1))))) 1)))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- (pow alpha 2) 1) (- (pow alpha 3) 1)))) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2)))))) (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (pow (- (pow alpha 2) 1) 2) (- (pow alpha 3) 1)))) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2))))) (/ (* (+ 1 alpha) (* (- (pow alpha 2) 1) (- (pow alpha 3) 1))) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2))))))) (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (pow (- (pow alpha 2) 1) 3) (- (pow alpha 3) 1)))) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2)))))) (* -1 (/ (* (+ 1 alpha) (* (pow (- (pow alpha 2) 1) 2) (- (pow alpha 3) 1))) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2)))))))) (/ (* (+ 1 alpha) (* (- (pow alpha 2) 1) (- (pow alpha 3) 1))) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2))))))) (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (log (pow (pow alpha (PI)) 2)) (+ 1 (+ alpha (pow alpha 2))))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (pow alpha 3) 1) (+ 1 (+ alpha (pow alpha 2))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (* (- (pow alpha 2) 1) (- (pow alpha 3) 1))) (+ 1 (+ alpha (pow alpha 2))))) (/ (pow alpha 3) (+ 1 (+ alpha (pow alpha 2))))) (/ 1 (+ 1 (+ alpha (pow alpha 2)))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (pow (- (pow alpha 2) 1) 2) (- (pow alpha 3) 1))) (+ 1 (+ alpha (pow alpha 2)))) (/ (* (- (pow alpha 2) 1) (- (pow alpha 3) 1)) (+ 1 (+ alpha (pow alpha 2)))))) (/ (pow alpha 3) (+ 1 (+ alpha (pow alpha 2))))) (/ 1 (+ 1 (+ alpha (pow alpha 2)))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (pow (- (pow alpha 2) 1) 3) (- (pow alpha 3) 1))) (+ 1 (+ alpha (pow alpha 2))))) (* -1 (/ (* (pow (- (pow alpha 2) 1) 2) (- (pow alpha 3) 1)) (+ 1 (+ alpha (pow alpha 2))))))) (/ (* (- (pow alpha 2) 1) (- (pow alpha 3) 1)) (+ 1 (+ alpha (pow alpha 2)))))) (/ (pow alpha 3) (+ 1 (+ alpha (pow alpha 2))))) (/ 1 (+ 1 (+ alpha (pow alpha 2)))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 6) 1) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 6) 1))) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))) (/ (pow alpha 6) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))) (/ 1 (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2) (- (pow alpha 6) 1))) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4)))))) (/ (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 6) 1)) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (/ (pow alpha 6) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))) (/ 1 (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3) (- (pow alpha 6) 1))) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))) (* -1 (/ (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2) (- (pow alpha 6) 1)) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))) (/ (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 6) 1)) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (/ (pow alpha 6) (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))) (/ 1 (* (PI) (* (log (pow alpha 2)) (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (PI) (log (pow alpha 2)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* (PI) (log (pow alpha 2))) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 1))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (/ (* (pow cosTheta 2) (- (pow alpha 6) 1)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (/ (* cosTheta (- (pow alpha 6) 1)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3))))))) (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow cosTheta 2) (- (pow alpha 2) 1))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ 1 (pow cosTheta 2)) (pow alpha 2)) 1))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3))))))) (pow cosTheta 2))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (- (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ 3/2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* 2 (/ (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))) (pow cosTheta 2)))) (pow cosTheta 2))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (- (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 3 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (/ 3/2 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))) (pow cosTheta 2))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))) (pow cosTheta 4))) (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (- (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))))))) (pow cosTheta 4)))))) (pow cosTheta 2))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (- (+ (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (+ (* (pow alpha 6) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 3)) (* 5/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (pow cosTheta 6))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 3 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (/ 3/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))) (pow cosTheta 2))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))) (pow cosTheta 4))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (+ (* 2 (* (pow alpha 4) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))))) (pow cosTheta 6))) (+ (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (- (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))))))) (pow cosTheta 4))) (+ (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (- (* 3 (/ 1 (* (PI) (log alpha)))) (+ (* 2 (* (PI) (* (log alpha) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))))) (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (- (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))))))))))))) (pow cosTheta 6))) (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))))) (pow cosTheta 6))))))))) (pow cosTheta 2))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (/ 1/8 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (/ (+ (* 3/8 (/ 1 (* (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (pow cosTheta 6))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (/ (+ (/ 3/8 (* (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (/ 3/4 (* (pow cosTheta 4) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (pow cosTheta 6))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (/ (+ (/ 3/8 (* (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 3/4 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 3) (pow (log alpha) 3))))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (/ 5/4 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (/ (* (pow alpha 6) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 3)) (pow cosTheta 6)))))) (pow cosTheta 6))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (/ (* (pow alpha 6) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 3)) (pow cosTheta 12))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (/ (+ (* (pow alpha 6) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 3)) (/ (* (pow alpha 6) (+ (* 2 (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)))) (pow cosTheta 2))) (pow cosTheta 12))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (/ (+ (* (pow alpha 6) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 3)) (+ (/ (* (pow alpha 6) (+ (* 2 (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)))) (pow cosTheta 2)) (/ (* (pow alpha 6) (+ (* 2 (* (pow (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (+ (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)) (* (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (+ (* 2 (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) 2)))))) (pow cosTheta 4)))) (pow cosTheta 12))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (/ (+ (* (pow alpha 6) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 3)) (+ (/ (* (pow alpha 6) (+ (* 2 (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))) (+ (* (+ (* -1 (- (* -2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)) (+ (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) 2))) (* (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (+ (* 2 (* (+ (* -1 (- (* -2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 2 (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))))))))))) (pow cosTheta 6)) (+ (/ (* (pow alpha 6) (+ (* 2 (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)))) (pow cosTheta 2)) (/ (* (pow alpha 6) (+ (* 2 (* (pow (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (+ (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)) (* (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (+ (* 2 (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) 2)))))) (pow cosTheta 4))))) (pow cosTheta 12))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 4))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (/ (+ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (pow cosTheta 2))) (pow cosTheta 4))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (/ (+ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (+ (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 4)) (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (pow cosTheta 2)))) (pow cosTheta 4))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (/ (+ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (+ (/ (* (pow alpha 2) (+ (* -1 (- (* -2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 6)) (+ (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 4)) (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (pow cosTheta 2))))) (pow cosTheta 4))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (pow cosTheta 4))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 2))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))))) (pow cosTheta 4))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* -1 (/ (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (pow cosTheta 4))) (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 2))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha)))))))))) (pow cosTheta 4))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* -1 (/ (- (* -2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))))) (pow cosTheta 6))) (+ (* -1 (/ (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (pow cosTheta 4))) (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 2))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (/ 2 (* (pow cosTheta 6) (* (PI) (log alpha))))))))))) (pow cosTheta 4))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha)))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (+ (* -1 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* 1/2 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 4))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (+ (* -3/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha))))) (+ (* -1 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 4))) (* 1/2 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))) (pow cosTheta 4))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (+ (* -2 (/ (pow alpha 2) (* (pow cosTheta 6) (* (PI) (log alpha))))) (+ (* -3/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha))))) (+ (* -1 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (+ (* -1 (/ (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (pow cosTheta 6))) (+ (* -1 (/ (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (pow cosTheta 4))) (* 1/2 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))))) (pow cosTheta 4))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* 1/2 (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 2))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (* 3/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha))))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (+ (* 3/2 (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log alpha))))) (+ (* 2 (/ (pow alpha 2) (* (pow cosTheta 6) (* (PI) (log alpha))))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))) (pow cosTheta 2))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ 1/2 (* (pow cosTheta 4) (* (PI) (log alpha))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 4))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))) (/ 3/2 (* (pow cosTheta 4) (* (PI) (log alpha)))))) (pow cosTheta 4))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (* 2 (/ 1 (* (pow cosTheta 6) (* (PI) (log alpha)))))))) (pow cosTheta 4))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2)))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (pow cosTheta 2))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 4))) (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ -1 (pow cosTheta 2))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* -1 (/ (+ 1 (/ 1 (pow cosTheta 2))) (pow cosTheta 2)))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (* -1 (/ (+ 1 (/ 1 (pow cosTheta 2))) (pow cosTheta 2))) 1) (pow cosTheta 2))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (- (* -1 (/ (+ 1 (/ 1 (pow cosTheta 2))) (pow cosTheta 4))) (+ 1 (/ 1 (pow cosTheta 2)))) (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(hole binary32 (* -1 (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(hole binary32 (* (pow cosTheta 2) (- (/ 1 (pow cosTheta 2)) 1))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 2)))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (/ (- (* -1 (/ (+ (/ 1 (* (PI) (log alpha))) (* 3/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (pow cosTheta 2))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (/ (- (* -1 (/ (+ (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 4))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (/ 1 (pow cosTheta 2))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (/ (+ 1 (* 2 (/ 1 (pow cosTheta 2)))) (pow cosTheta 2))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (/ (+ 1 (+ (* 2 (/ 1 (pow cosTheta 2))) (/ 3 (pow cosTheta 4)))) (pow cosTheta 2))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) #s(hole binary32 (/ (+ 1 (+ (* 2 (/ 1 (pow cosTheta 2))) (+ (* 4 (/ 1 (pow cosTheta 6))) (/ 3 (pow cosTheta 4))))) (pow cosTheta 2))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (pow cosTheta 4)))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (* (pow cosTheta 4) (- 1 (* 2 (/ 1 (pow cosTheta 2)))))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(hole binary32 (* (pow cosTheta 4) (- (+ 1 (/ 1 (pow cosTheta 4))) (* 2 (/ 1 (pow cosTheta 2)))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (/ 1/8 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (/ (+ (* 3/8 (/ 1 (* (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (pow cosTheta 6))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (/ (+ (/ 3/8 (* (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (/ 3/4 (* (pow cosTheta 4) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (pow cosTheta 6))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (/ (+ (/ 3/8 (* (pow cosTheta 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 3/4 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 3) (pow (log alpha) 3))))) (+ (* 5/4 (/ 1 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (pow cosTheta 6))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (/ 1/2 (* (pow cosTheta 4) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (pow cosTheta 6) (* (PI) (log alpha)))))))) (pow cosTheta 2))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ -1 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (* -1 (/ (+ (/ 1 (* (PI) (log alpha))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 2)))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ (- (* -1 (/ (+ (/ 1 (* (PI) (log alpha))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 2))) (/ 1 (* (PI) (log alpha)))) (pow cosTheta 2))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ (- (* -1 (/ (+ (/ 1 (* (PI) (log alpha))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha))))) (pow cosTheta 4))) (+ (/ 1 (* (PI) (log alpha))) (/ 1 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 2))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (/ 1/4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (/ (- (+ (/ 1/2 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 4))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (/ (- (+ (/ 1/2 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 3/4 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)) (pow cosTheta 4))))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (pow cosTheta 4))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (* (PI) (log alpha))))))) (pow cosTheta 4))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (/ (- (+ (* 2 (/ (* (pow alpha 4) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow cosTheta 6))) (+ (/ 1/2 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 3/4 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (+ (/ 1 (* (pow cosTheta 6) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)) (pow cosTheta 4))))))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))) (pow cosTheta 6))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (pow cosTheta 4))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (* (PI) (log alpha)))))))) (pow cosTheta 4))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (/ (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)) (pow cosTheta 8))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (/ (+ (* 2 (/ (* (pow alpha 4) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow cosTheta 2))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (pow cosTheta 8))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (/ (+ (* 2 (/ (* (pow alpha 4) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow cosTheta 2))) (+ (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)) (/ (* (pow alpha 4) (+ (* 2 (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) 2))) (pow cosTheta 4)))) (pow cosTheta 8))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (/ (+ (* 2 (/ (* (pow alpha 4) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow cosTheta 2))) (+ (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2)) (+ (/ (* (pow alpha 4) (+ (* 2 (* (+ (* -1 (- (* -2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 2 (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))))))) (pow cosTheta 6)) (/ (* (pow alpha 4) (+ (* 2 (* (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (pow (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) 2))) (pow cosTheta 4))))) (pow cosTheta 8))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (/ 1/4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (/ (- (+ (/ 1/2 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (* (PI) (log alpha)))))) (pow cosTheta 4))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (/ (- (+ (/ 1/2 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 3/4 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (pow cosTheta 4))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (* (PI) (log alpha))))))) (pow cosTheta 4))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (/ (- (+ (/ 1/2 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 3/4 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (+ (/ 1 (* (pow cosTheta 6) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))) (pow cosTheta 6))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (pow cosTheta 4))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (* (PI) (log alpha)))))))) (pow cosTheta 4))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ 1/4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))) (pow cosTheta 4))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (/ 3/4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (pow cosTheta 4))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (/ 1/2 (* (pow cosTheta 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 3/4 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (+ (/ 1 (* (pow cosTheta 6) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (pow cosTheta 4))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 6) (* (PI) (log alpha)))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (pow cosTheta 2))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (pow cosTheta 6))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))) (pow cosTheta 4))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (pow cosTheta 2))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))) (pow cosTheta 6))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))) (pow cosTheta 6))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))) (pow cosTheta 4))) (+ (* -1/2 (/ (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (pow cosTheta 2))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))) (pow cosTheta 6))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (- (pow alpha 2) 1))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 2))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (log (pow (pow alpha (PI)) 2)) (- (pow alpha 2) 1)))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (/ (* (+ 1 alpha) (- alpha 1)) (* (log (pow (pow alpha (PI)) 2)) (- (pow alpha 2) 1))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 4) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 3))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 2))))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 6) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 4))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (log (pow (pow alpha (PI)) 2)) (- (pow alpha 2) 1)))) (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 4) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 3))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (- (pow alpha 2) 1) 2)))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- alpha 1) (* (pow cosTheta 2) (- (pow alpha 2) 1)))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))) (/ alpha (- (pow alpha 2) 1))) (+ (/ 1 (- (pow alpha 2) 1)) (/ alpha (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))) (+ (/ alpha (* (pow cosTheta 4) (pow (- (pow alpha 2) 1) 3))) (/ alpha (- (pow alpha 2) 1)))) (+ (/ 1 (* (pow cosTheta 4) (pow (- (pow alpha 2) 1) 3))) (+ (/ 1 (- (pow alpha 2) 1)) (/ alpha (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2)))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))) (+ (/ 1 (* (pow cosTheta 6) (pow (- (pow alpha 2) 1) 4))) (+ (/ alpha (* (pow cosTheta 4) (pow (- (pow alpha 2) 1) 3))) (/ alpha (- (pow alpha 2) 1))))) (+ (/ 1 (* (pow cosTheta 4) (pow (- (pow alpha 2) 1) 3))) (+ (/ 1 (- (pow alpha 2) 1)) (+ (/ alpha (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2))) (/ alpha (* (pow cosTheta 6) (pow (- (pow alpha 2) 1) 4))))))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (+ (* -1 (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2)))))) (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1))))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1)))) (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (pow cosTheta 4) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 3)))))) (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2)))))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (pow cosTheta 6) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 4)))))) (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1))))) (+ (* -1 (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (pow cosTheta 4) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 3)))))) (/ (* (+ 1 alpha) (- (pow alpha 3) 1)) (* (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2))))))) (pow cosTheta 2))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (pow alpha 3) 1) (* (pow cosTheta 2) (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2)))) (/ (pow alpha 3) (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1)))) (+ (/ 1 (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1))) (/ (pow alpha 3) (* (pow cosTheta 2) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2)))))) (pow cosTheta 2))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2)))) (+ (/ (pow alpha 3) (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1))) (/ (pow alpha 3) (* (pow cosTheta 4) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 3)))))) (+ (/ 1 (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1))) (+ (/ 1 (* (pow cosTheta 4) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 3)))) (/ (pow alpha 3) (* (pow cosTheta 2) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2))))))) (pow cosTheta 2))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2)))) (+ (/ 1 (* (pow cosTheta 6) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 4)))) (+ (/ (pow alpha 3) (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1))) (/ (pow alpha 3) (* (pow cosTheta 4) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 3))))))) (+ (/ 1 (* (+ 1 (+ alpha (pow alpha 2))) (- (pow alpha 2) 1))) (+ (/ 1 (* (pow cosTheta 4) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 3)))) (+ (/ (pow alpha 3) (* (pow cosTheta 2) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 2)))) (/ (pow alpha 3) (* (pow cosTheta 6) (* (+ 1 (+ alpha (pow alpha 2))) (pow (- (pow alpha 2) 1) 4)))))))) (pow cosTheta 2))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 6) 1) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2)))))) (/ (pow alpha 6) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))) (/ (pow alpha 6) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2)))))))) (pow cosTheta 2))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2)))))) (+ (/ (pow alpha 6) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))) (/ (pow alpha 6) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3)))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))) (+ (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3)))))) (/ (pow alpha 6) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))))))) (pow cosTheta 2))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2)))))) (+ (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 4)))))) (+ (/ (pow alpha 6) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))) (/ (pow alpha 6) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3))))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))) (+ (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3)))))) (+ (/ (pow alpha 6) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2)))))) (/ (pow alpha 6) (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (* (+ 1 (+ (pow alpha 2) (pow alpha 4))) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 4)))))))))) (pow cosTheta 2))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (+ (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))) (/ (* (PI) (log (pow alpha 2))) (pow cosTheta 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ 1 (pow cosTheta 2)) (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) #s(hole binary32 (/ -1/2 (* (PI) (log alpha)))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) #s(hole binary32 (- (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (PI)) #s(hole binary32 (/ -1 (PI))))
#s(approx (/ (- (* alpha alpha) 1) (PI)) #s(hole binary32 (- (/ (pow alpha 2) (PI)) (/ 1 (PI)))))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 -1))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (- (pow alpha 2) 1)))
#s(approx (* alpha alpha) #s(hole binary32 (pow alpha 2)))
#s(approx alpha #s(hole binary32 alpha))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* 2 (log alpha))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))) (* 2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)))))))) (* -1 (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3))))) (+ (* -2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (* (+ (* -2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))) (* 2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)))))) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))) (+ (* 4 (* (pow cosTheta 2) (* (PI) (* (log alpha) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2))))) (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (* (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))))))) (+ (* -2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))) (* 2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)))))))) (* -1 (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (/ -1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (- (* (pow alpha 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (* 1/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (- (* (pow alpha 6) (+ (* (pow alpha 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3))) (* 1/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (- (* (pow alpha 6) (+ (* (pow alpha 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* (pow alpha 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3))) (* 1/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* (pow alpha 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* (pow alpha 2) (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3))) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3)))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (* (log alpha) (PI)) #s(hole binary32 (* (PI) (log alpha))))
#s(approx (log alpha) #s(hole binary32 (log alpha)))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))
#s(approx (/ -1/2 (* (log alpha) (PI))) #s(hole binary32 (/ -1/2 (* (PI) (log alpha)))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (/ -1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ 1 (* (log alpha) (PI))) #s(hole binary32 (/ 1 (* (PI) (log alpha)))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (/ 1/4 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (+ (* 1/2 (/ (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/4 (/ 1 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 2) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* -1/2 (/ (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))) (* 1/4 (/ 1 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 2) (- (+ (* -2 (/ (* (pow alpha 2) (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2))) (+ 1 (* -1 (pow cosTheta 2))))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* -1/2 (/ (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))) (* 1/4 (/ 1 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (* (pow alpha 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (* (pow alpha 4) (+ (* -2 (/ (* (pow alpha 2) (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2))) (+ 1 (* -1 (pow cosTheta 2))))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow alpha 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow alpha 2) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (/ 1/4 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (+ (* 1/2 (/ (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/4 (/ 1 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* -1/2 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* -1/2 (/ (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))) (* 1/4 (/ 1 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ 1/4 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* -1/2 (/ (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* (pow alpha 2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/2 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ -1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* (pow alpha 2) (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2)))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* (pow alpha 2) (- (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (* (pow cosTheta 2) (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (+ 1 (* -1 (pow cosTheta 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2)))))) (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (/ 1 (log (pow (pow alpha (PI)) 2)))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (+ (/ 1 (log (pow (pow alpha (PI)) 2))) (/ alpha (log (pow (pow alpha (PI)) 2))))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) #s(hole binary32 (+ (* alpha (- (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/8 (/ (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) #s(hole binary32 (+ (* alpha (- (+ (* -1 (* alpha (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (* 1/8 (/ (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) #s(hole binary32 (+ (* alpha (- (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* alpha (+ (* -1 (* alpha (+ (* -1/4 (/ (* (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* -1/96 (/ (* (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2))))) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/96 (/ (+ (* -96 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* -64 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* -48 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* 16 (* (pow (PI) 4) (pow (log alpha) 4))) (* 192 (* (pow (PI) 4) (pow (log alpha) 4))))))) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* -1 (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 1/8 (/ (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) #s(hole binary32 (/ 1/2 (* alpha (* (PI) (log alpha))))))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) #s(hole binary32 (/ (+ (* alpha (- (* 1/2 (/ 1 (* (PI) (log alpha)))) (* 1/8 (/ (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))) alpha)))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) #s(hole binary32 (/ (+ (* alpha (- (+ (* -1 (* alpha (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 1/2 (/ 1 (* (PI) (log alpha))))) (* 1/8 (/ (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))) alpha)))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) #s(hole binary32 (/ (+ (* alpha (- (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (* alpha (- (* -1 (* alpha (+ (* -1/4 (/ (* (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* -1/96 (/ (* (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2))))) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/96 (/ (+ (* -96 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* -64 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* -48 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* 16 (* (pow (PI) 4) (pow (log alpha) 4))) (* 192 (* (pow (PI) 4) (pow (log alpha) 4))))))) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* 1/8 (/ (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))) alpha)))
#s(approx (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) #s(hole binary32 (* 2 (* (PI) (log alpha)))))
#s(approx (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) #s(hole binary32 (exp (* 2 (* (PI) (log alpha))))))
#s(approx (* (* -1 (* (PI) (- 0 (log alpha)))) 2) #s(hole binary32 (* 2 (* (PI) (log alpha)))))
#s(approx (* -1 (* (PI) (- 0 (log alpha)))) #s(hole binary32 (* (PI) (log alpha))))
#s(approx (* (PI) (- 0 (log alpha))) #s(hole binary32 (* -1 (* (PI) (log alpha)))))
#s(approx (- 0 (log alpha)) #s(hole binary32 (* -1 (log alpha))))
#s(approx (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) #s(hole binary32 (/ 1/2 (* alpha (* (PI) (log alpha))))))
#s(approx (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) #s(hole binary32 (/ (+ (* -1/8 (/ (* alpha (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) alpha)))
#s(approx (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) #s(hole binary32 (/ (+ (* alpha (- (* -1 (* alpha (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 1/8 (/ (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))) alpha)))
#s(approx (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) #s(hole binary32 (/ (+ (* alpha (- (* alpha (- (* -1 (* alpha (+ (* -1/4 (/ (* (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* -1/96 (/ (* (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2))))) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/96 (/ (+ (* -96 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* -64 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* -48 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* 16 (* (pow (PI) 4) (pow (log alpha) 4))) (* 192 (* (pow (PI) 4) (pow (log alpha) 4))))))) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* -1/32 (/ (pow (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/24 (/ (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 1/8 (/ (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))) alpha)))
#s(approx (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) #s(hole binary32 (* 2 (* alpha (* (PI) (log alpha))))))
#s(approx (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) #s(hole binary32 (* alpha (+ (* 1/2 (* alpha (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 2 (* (PI) (log alpha)))))))
#s(approx (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) #s(hole binary32 (* alpha (+ (* 2 (* (PI) (log alpha))) (* alpha (+ (* 1/6 (* alpha (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))))) (* 1/2 (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) #s(hole binary32 (* alpha (+ (* 2 (* (PI) (log alpha))) (* alpha (+ (* 1/2 (+ (* -4 (* (pow (PI) 2) (pow (log alpha) 2))) (* 4 (* (pow (PI) 2) (pow (log alpha) 2))))) (* alpha (+ (* 1/24 (* alpha (+ (* -96 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* -64 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* -48 (* (pow (PI) 4) (pow (log alpha) 4))) (+ (* 16 (* (pow (PI) 4) (pow (log alpha) 4))) (* 192 (* (pow (PI) 4) (pow (log alpha) 4))))))))) (* 1/6 (+ (* -24 (* (pow (PI) 3) (pow (log alpha) 3))) (+ (* 8 (* (pow (PI) 3) (pow (log alpha) 3))) (* 16 (* (pow (PI) 3) (pow (log alpha) 3))))))))))))))
#s(approx (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) #s(hole binary32 1))
#s(approx (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) #s(hole binary32 (+ 1 (* 2 (* alpha (* (PI) (log alpha)))))))
#s(approx (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) #s(hole binary32 (+ 1 (* alpha (+ (* 2 (* alpha (* (pow (PI) 2) (pow (log alpha) 2)))) (* 2 (* (PI) (log alpha))))))))
#s(approx (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) #s(hole binary32 (+ 1 (* alpha (+ (* 2 (* (PI) (log alpha))) (* alpha (+ (* 4/3 (* alpha (* (pow (PI) 3) (pow (log alpha) 3)))) (* 2 (* (pow (PI) 2) (pow (log alpha) 2))))))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ -1 (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (/ alpha (+ 1 (* -1 (pow cosTheta 2)))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* alpha (+ (/ 1 (+ 1 (* -1 (pow cosTheta 2)))) (/ (* alpha (pow cosTheta 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* alpha (+ (* alpha (- (* -1 (/ (* alpha (pow cosTheta 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (pow cosTheta 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (- alpha 1) #s(hole binary32 -1))
#s(approx (- alpha 1) #s(hole binary32 (- alpha 1)))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ -1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (/ (* (pow alpha 2) (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* (pow alpha 2) (- (* alpha (- (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))) (+ (* -2 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (/ 1 (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* (pow alpha 2) (- (* alpha (- (+ (* alpha (- (+ (* -2 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (/ 1 (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (+ (* -1 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ (pow (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -2 (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (/ 1 (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (pow cosTheta 2) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (log (pow (pow alpha (PI)) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (/ 1 (* (log (pow (pow alpha (PI)) 2)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (+ alpha 1) #s(hole binary32 1))
#s(approx (+ alpha 1) #s(hole binary32 (+ 1 alpha)))
#s(approx (log (pow (pow alpha (PI)) 2)) #s(hole binary32 (log (pow (pow alpha (PI)) 2))))
#s(approx (pow (pow alpha (PI)) 2) #s(hole binary32 (pow (pow alpha (PI)) 2)))
#s(approx (pow alpha (PI)) #s(hole binary32 (pow alpha (PI))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ -1 (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (/ alpha (+ 1 (* -1 (pow cosTheta 2)))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* alpha (+ (* -1 (* alpha (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ 1 (+ 1 (* -1 (pow cosTheta 2))))))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (* alpha (+ (* alpha (- (* alpha (- (/ 1 (+ 1 (* -1 (pow cosTheta 2)))) (+ (* -2 (/ (pow cosTheta 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (+ (* -1 (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ 1 (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (pow cosTheta 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ 1 (+ 1 (* -1 (pow cosTheta 2))))))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))) (/ 1 (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) #s(hole binary32 -1))
#s(approx (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) #s(hole binary32 (- alpha 1)))
#s(approx (- (* (* alpha alpha) alpha) 1) #s(hole binary32 -1))
#s(approx (- (* (* alpha alpha) alpha) 1) #s(hole binary32 (- (pow alpha 3) 1)))
#s(approx (* (* alpha alpha) alpha) #s(hole binary32 (pow alpha 3)))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) #s(hole binary32 1))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) #s(hole binary32 (+ 1 alpha)))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) #s(hole binary32 (+ 1 (* alpha (+ 1 alpha)))))
#s(approx (+ 1 (* alpha 1)) #s(hole binary32 1))
#s(approx (+ 1 (* alpha 1)) #s(hole binary32 (+ 1 alpha)))
#s(approx (* alpha 1) #s(hole binary32 alpha))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* 1/2 (/ (* (pow alpha 2) (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1/2 (/ (+ 1 (+ (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ (pow (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))))) (* -1/2 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (+ (* -1 (/ (* (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1/2 (/ (+ 1 (+ (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ (pow (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))) (+ 1 (* -1 (pow cosTheta 2))))) (+ (* -1/2 (/ (+ (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (* 2 (pow cosTheta 2)))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ (* (+ 1 (+ (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))))) (+ (* -1/2 (/ (+ 1 (+ (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ (pow (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))))) (* -1/2 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 -1))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (- (pow alpha 2) 1)))
#s(approx (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) #s(hole binary32 -1))
#s(approx (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) #s(hole binary32 (- (pow alpha 2) 1)))
#s(approx (- 1 (/ 1 (* alpha alpha))) #s(hole binary32 (/ -1 (pow alpha 2))))
#s(approx (- 1 (/ 1 (* alpha alpha))) #s(hole binary32 (/ (- (pow alpha 2) 1) (pow alpha 2))))
#s(approx (/ 1 (* alpha alpha)) #s(hole binary32 (/ 1 (pow alpha 2))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* -2 (* (pow alpha 2) (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* -2 (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))))) (* 2 (* (pow alpha 2) (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))))))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* 2 (* (PI) (log alpha)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* -1 (pow cosTheta 2))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2)))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2)))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* -1 cosTheta)))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) cosTheta))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ cosTheta (* -1 cosTheta)))) (* -1 cosTheta))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ cosTheta (* -1 cosTheta))) (+ cosTheta (* -1 cosTheta)))) (* -1 cosTheta))))))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 -1))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (- (pow alpha 6) 1)))
#s(approx (pow (* alpha alpha) 3) #s(hole binary32 (pow alpha 6)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 1))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (+ 1 (pow alpha 2))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (+ 1 (* (pow alpha 2) (+ 1 (pow alpha 2))))))
#s(approx (neg (* alpha alpha)) #s(hole binary32 (* -1 (pow alpha 2))))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(hole binary32 1))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(hole binary32 (+ 1 (pow alpha 2))))
#s(approx (* (* alpha alpha) 1) #s(hole binary32 (pow alpha 2)))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) #s(hole binary32 (* (pow alpha 2) (- (* 1/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (- (* alpha alpha) 1) (PI)) #s(hole binary32 (/ (pow alpha 2) (PI))))
#s(approx (/ (- (* alpha alpha) 1) (PI)) #s(hole binary32 (* (pow alpha 2) (- (/ 1 (PI)) (/ 1 (* (pow alpha 2) (PI)))))))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (pow alpha 2)))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (* (pow alpha 2) (- 1 (/ 1 (pow alpha 2))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* -2 (log (/ 1 alpha)))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (+ (/ 1 (pow alpha 2)) (pow cosTheta 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))))) (* -2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) (pow alpha 2)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2)))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 4) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)))))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (* -2 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* -2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) (pow alpha 2))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2)))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 4) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))))))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (* -2 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (* -2 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))) (pow cosTheta 2))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))))) (* (pow alpha 6) (pow cosTheta 2)))) (+ (* -2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) (pow alpha 2))) (+ (* 1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* 1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow alpha 6) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))))) (+ (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (* (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (* -2 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (- (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (* (pow alpha 6) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)))))))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (/ (* (pow alpha 12) (* (pow cosTheta 6) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3))) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ (* (pow cosTheta 6) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 6) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* -1 (/ (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3) (pow alpha 6))) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 6) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (/ (* (pow alpha 12) (* (pow cosTheta 6) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3))) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ (* (pow cosTheta 6) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 6) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (* -1 (/ (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3) (pow alpha 6))) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 6) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (/ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (* (pow alpha 4) (+ (* -1 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) (pow alpha 2))) (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (/ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (+ (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (pow alpha 2))) (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* -1 (* (pow alpha 2) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (* -1 (+ (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ -1/2 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) #s(hole binary32 (/ -1/2 (* (PI) (log (/ 1 alpha))))))
#s(approx (* (log alpha) (PI)) #s(hole binary32 (* -1 (* (PI) (log (/ 1 alpha))))))
#s(approx (log alpha) #s(hole binary32 (* -1 (log (/ 1 alpha)))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))
#s(approx (/ -1/2 (* (log alpha) (PI))) #s(hole binary32 (/ 1/2 (* (PI) (log (/ 1 alpha))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (/ 1/8 (* (pow (PI) 3) (* (pow (log (/ 1 alpha)) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ 1/2 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ -1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ 1 (* (log alpha) (PI))) #s(hole binary32 (/ -1 (* (PI) (log (/ 1 alpha))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (/ (* (pow alpha 8) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (* (pow alpha 8) (+ (* -2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* -2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (pow alpha 4)))) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (pow alpha 4) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* -2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* 1/2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (pow alpha 6))) (+ (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (pow alpha 4))))) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (pow alpha 4) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (/ (* (pow alpha 8) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (* (pow alpha 8) (+ (* -2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (* (pow alpha 8) (+ (* -2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (pow alpha 4)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (* -1/2 (/ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (pow alpha 2))) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1/4 (* (pow alpha 4) (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (+ (* -1/2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (pow alpha 2))) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ 1/4 (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* 1/2 (/ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* (pow alpha 4) (+ (* -1/2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (pow alpha 2))) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))) (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (/ 1 (* (pow alpha 4) (* (pow cosTheta 6) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (+ (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (/ 1 (* (pow alpha 4) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (* -1 (/ (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (* (pow alpha 6) (* (pow cosTheta 8) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (+ (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 4) (* (pow cosTheta 6) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))) (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (/ alpha (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (* alpha (+ (/ 1 (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))) (/ 1 (* alpha (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) #s(hole binary32 (* alpha (- (* 1/2 (/ 1 (* alpha (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) #s(hole binary32 (- (* 1/2 (/ 1 (* alpha (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))))))
#s(approx (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) #s(hole binary32 (/ -1/2 (* (PI) (log (/ 1 alpha))))))
#s(approx (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) #s(hole binary32 (* -2 (* (PI) (log (/ 1 alpha))))))
#s(approx (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) #s(hole binary32 (exp (* -2 (* (PI) (log (/ 1 alpha)))))))
#s(approx (* (* -1 (* (PI) (- 0 (log alpha)))) 2) #s(hole binary32 (* -2 (* (PI) (log (/ 1 alpha))))))
#s(approx (* -1 (* (PI) (- 0 (log alpha)))) #s(hole binary32 (* -1 (* (PI) (log (/ 1 alpha))))))
#s(approx (* (PI) (- 0 (log alpha))) #s(hole binary32 (* (PI) (log (/ 1 alpha)))))
#s(approx (- 0 (log alpha)) #s(hole binary32 (log (/ 1 alpha))))
#s(approx (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) #s(hole binary32 (exp (* 2 (* alpha (* (PI) (log alpha)))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ 1 (* alpha (pow cosTheta 2)))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (/ 1 (pow cosTheta 2)) (/ 1 (* alpha (pow cosTheta 2)))) alpha)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow alpha 2) (pow cosTheta 2))) (/ 1 (pow cosTheta 2))) (+ (/ 1 (* alpha (pow cosTheta 2))) (/ 1 (* (pow alpha 2) (pow cosTheta 4))))) alpha)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow alpha 2) (pow cosTheta 2))) (+ (/ 1 (* (pow alpha 3) (pow cosTheta 4))) (/ 1 (pow cosTheta 2)))) (+ (/ 1 (* alpha (pow cosTheta 2))) (+ (/ 1 (* (pow alpha 2) (pow cosTheta 4))) (/ 1 (* (pow alpha 3) (pow cosTheta 2)))))) alpha)))
#s(approx (- alpha 1) #s(hole binary32 alpha))
#s(approx (- alpha 1) #s(hole binary32 (* alpha (- 1 (/ 1 alpha)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))) (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (* -1 (/ (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (pow cosTheta 6) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (/ 1 (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (pow alpha 4))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (pow cosTheta 6) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (/ 1 (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 6) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))) (pow alpha 5))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (pow alpha 4) (* (pow cosTheta 6) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))))) (+ (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))) (/ 1 (* (pow alpha 4) (* (pow cosTheta 4) (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))))))))
#s(approx (+ alpha 1) #s(hole binary32 alpha))
#s(approx (+ alpha 1) #s(hole binary32 (* alpha (+ 1 (/ 1 alpha)))))
#s(approx (log (pow (pow alpha (PI)) 2)) #s(hole binary32 (log (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2))))
#s(approx (pow (pow alpha (PI)) 2) #s(hole binary32 (pow (exp (* -1 (* (PI) (log (/ 1 alpha))))) 2)))
#s(approx (pow alpha (PI)) #s(hole binary32 (exp (* -1 (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ 1 (* alpha (pow cosTheta 2)))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (/ 1 (pow cosTheta 2)) (/ 1 (* alpha (pow cosTheta 2)))) alpha)))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (/ 1 (* (pow alpha 2) (pow cosTheta 2))) (/ 1 (pow cosTheta 2))) (+ (/ 1 (* alpha (pow cosTheta 2))) (/ 1 (* (pow alpha 2) (pow cosTheta 4))))) alpha)))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ (- (+ (* -1 (/ (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (pow cosTheta 4))) (/ 1 (pow cosTheta 2))) (pow alpha 3))) (+ (/ 1 (* (pow alpha 2) (pow cosTheta 2))) (/ 1 (pow cosTheta 2)))) (+ (/ 1 (* alpha (pow cosTheta 2))) (/ 1 (* (pow alpha 2) (pow cosTheta 4))))) alpha)))
#s(approx (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) #s(hole binary32 alpha))
#s(approx (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) #s(hole binary32 (* alpha (- 1 (/ 1 alpha)))))
#s(approx (- (* (* alpha alpha) alpha) 1) #s(hole binary32 (pow alpha 3)))
#s(approx (- (* (* alpha alpha) alpha) 1) #s(hole binary32 (* (pow alpha 3) (- 1 (/ 1 (pow alpha 3))))))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) #s(hole binary32 (pow alpha 2)))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) #s(hole binary32 (* (pow alpha 2) (+ 1 (/ 1 alpha)))))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) #s(hole binary32 (* (pow alpha 2) (+ 1 (+ (/ 1 alpha) (/ 1 (pow alpha 2)))))))
#s(approx (+ 1 (* alpha 1)) #s(hole binary32 alpha))
#s(approx (+ 1 (* alpha 1)) #s(hole binary32 (* alpha (+ 1 (/ 1 alpha)))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* 1/2 (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* -1/2 (/ (+ 1 (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 6) (* (PI) (log (/ 1 alpha))))))) (pow alpha 4))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))) (/ 1/2 (* (pow alpha 6) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1 (/ (+ (* -1/2 (/ (+ 1 (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 6) (* (PI) (log (/ 1 alpha))))))) (* (pow alpha 6) (pow cosTheta 2)))) (+ (* -1/2 (/ (+ 1 (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (pow alpha 4) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (+ 1 (+ (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* -1 (pow cosTheta 2)))) (* (pow alpha 6) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ (+ 1 (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (pow alpha 6) (* (pow cosTheta 6) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (pow cosTheta 6) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (pow alpha 2)))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (* (pow alpha 2) (- 1 (/ 1 (pow alpha 2))))))
#s(approx (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) #s(hole binary32 (pow alpha 2)))
#s(approx (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) #s(hole binary32 (* (pow alpha 2) (- 1 (/ 1 (pow alpha 2))))))
#s(approx (- 1 (/ 1 (* alpha alpha))) #s(hole binary32 1))
#s(approx (- 1 (/ 1 (* alpha alpha))) #s(hole binary32 (- 1 (/ 1 (pow alpha 2)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 6))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4)))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* -2 (* (PI) (log (/ 1 alpha))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (/ 1 (pow alpha 2)) (pow cosTheta 2)) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (pow alpha 4))) (+ (/ 1 (pow alpha 2)) (pow cosTheta 2))) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (pow cosTheta 2) (pow alpha 6))) (+ (/ 1 (pow alpha 2)) (+ (/ (pow cosTheta 2) (pow alpha 6)) (pow cosTheta 2)))) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 4))) (+ (/ (pow cosTheta 2) (pow alpha 2)) (/ (pow cosTheta 2) (pow alpha 4))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (pow cosTheta 2)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (pow alpha 4))) (pow cosTheta 2)) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (pow cosTheta 2) (pow alpha 6))) (+ (/ (pow cosTheta 2) (pow alpha 6)) (pow cosTheta 2))) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 4))) (+ (/ (pow cosTheta 2) (pow alpha 2)) (/ (pow cosTheta 2) (pow alpha 4))))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) cosTheta)))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ cosTheta (* -1 (/ cosTheta (pow alpha 2)))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ cosTheta (* -1 (/ (+ cosTheta (* -1 cosTheta)) (pow alpha 4)))) (/ cosTheta (pow alpha 2))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ cosTheta (+ (* -1 (/ cosTheta (pow alpha 6))) (/ cosTheta (pow alpha 6)))) (+ (* -1 (/ cosTheta (pow alpha 4))) (+ (/ cosTheta (pow alpha 2)) (/ cosTheta (pow alpha 4))))))))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (pow alpha 6)))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (* (pow alpha 6) (- 1 (/ 1 (pow alpha 6))))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (pow alpha 4)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (* (pow alpha 4) (+ 1 (/ 1 (pow alpha 2))))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (* (pow alpha 4) (+ 1 (+ (/ 1 (pow alpha 2)) (/ 1 (pow alpha 4)))))))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(hole binary32 (pow alpha 2)))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(hole binary32 (* (pow alpha 2) (+ 1 (/ 1 (pow alpha 2))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) #s(hole binary32 (* (pow alpha 2) (- (* 1/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ -1 alpha)))))) (* 1/2 (/ 1 (* (PI) (log (/ -1 alpha)))))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* -2 (log (/ -1 alpha)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* -1 (/ (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))))) (* 2 (/ (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 4) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (* 2 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))) (* 2 (/ (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 4) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow alpha 6) (pow cosTheta 4)))))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (* 2 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))) (pow cosTheta 2))) (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))))) (* (pow alpha 6) (pow cosTheta 2)))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (* 2 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))) (+ (* -1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* -1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))) (* (pow alpha 6) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))) (+ (* 2 (/ (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (* (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (* 2 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* (pow alpha 6) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))))))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (* -1 (/ (* (pow alpha 12) (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3))) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (* (pow alpha 12) (+ (* -1 (/ (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -1 (/ (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -1 (/ (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3) (pow alpha 6))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* -1 (/ (* (pow alpha 12) (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3))) (pow (+ 1 (* -1 (pow cosTheta 2))) 3)))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 12) (+ (* -1 (/ (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -1 (/ (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) #s(hole binary32 (* (pow alpha 12) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 4) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* -1 (/ (* (pow cosTheta 6) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (+ (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (* (pow alpha 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3) (pow alpha 6))))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (* -1 (/ (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ 1/2 (* (pow alpha 2) (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* -1/2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ 1/2 (* (pow alpha 2) (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* -1/2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) #s(hole binary32 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) #s(hole binary32 (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) #s(hole binary32 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1/2 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) #s(hole binary32 (/ 1/2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (* (log alpha) (PI)) #s(hole binary32 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))
#s(approx (log alpha) #s(hole binary32 (+ (log -1) (* -1 (log (/ -1 alpha))))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) #s(hole binary32 (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (/ -1/2 (* (log alpha) (PI))) #s(hole binary32 (/ -1/2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) #s(hole binary32 (/ -1/8 (* (pow (PI) 3) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) #s(hole binary32 (/ -1/2 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) #s(hole binary32 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ 1 (* (log alpha) (PI))) #s(hole binary32 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (/ (* (pow alpha 8) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (* (pow alpha 8) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (pow alpha 4)))) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow alpha 4) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (* 1/2 (/ (- (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* -1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))) (pow alpha 6))) (+ (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (pow alpha 4))))) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow alpha 4) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (/ (* (pow alpha 8) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (* (pow alpha 8) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) #s(hole binary32 (* (pow alpha 8) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (* (pow alpha 2) (+ 1 (* -1 (pow cosTheta 2)))))) (+ (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (pow alpha 4)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (* -1/2 (/ (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/2 (/ (- (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* -1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))) (pow alpha 2))) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1/4 (* (pow alpha 4) (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* -1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))) (pow alpha 2))) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (/ 1/4 (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* 1/2 (/ (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) #s(hole binary32 (* (pow alpha 4) (+ (* -1/2 (/ (- (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* -1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))) (pow alpha 2))) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (pow alpha 2))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (pow alpha 2))) (+ (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))) (* (pow alpha 4) (pow cosTheta 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1 (/ (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (pow alpha 2))) (+ (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))) (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (/ alpha (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) #s(hole binary32 (* alpha (+ (/ 1 (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))) (/ 1 (* alpha (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) #s(hole binary32 (* alpha (+ (* 1/2 (/ 1 (* alpha (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) #s(hole binary32 (+ (* 1/2 (/ 1 (* alpha (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) #s(hole binary32 (/ 1/2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) #s(hole binary32 (* 2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) #s(hole binary32 (exp (* 2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* (* -1 (* (PI) (- 0 (log alpha)))) 2) #s(hole binary32 (* 2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (* -1 (* (PI) (- 0 (log alpha)))) #s(hole binary32 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))
#s(approx (* (PI) (- 0 (log alpha))) #s(hole binary32 (* -1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (- 0 (log alpha)) #s(hole binary32 (* -1 (+ (log -1) (* -1 (log (/ -1 alpha)))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (/ 1 (* alpha (pow cosTheta 2))) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (/ 1 (* alpha (pow cosTheta 2))) (+ (/ 1 (* alpha (pow cosTheta 4))) (/ 1 (pow cosTheta 2)))) alpha)) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (- (/ 1 (pow cosTheta 2)) (/ 1 (pow cosTheta 4)))) (/ 1 (* alpha (pow cosTheta 2)))) (/ 1 (* alpha (pow cosTheta 4)))) alpha)) (/ 1 (pow cosTheta 2))) alpha)) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (- alpha 1) #s(hole binary32 (* -1 (* alpha (- (/ 1 alpha) 1)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (+ (* -1 (/ (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))) (/ 1 (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))) (pow alpha 3))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (+ (* -1 (/ (- (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))) (+ (/ 1 (* alpha (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))) (/ 1 (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (+ (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* alpha (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (+ (* -1 (/ (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* alpha (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))))) (+ (/ 1 (* alpha (* (pow cosTheta 4) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))) (/ (pow (+ 1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) 2) (* alpha (* (pow cosTheta 6) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))))) (pow alpha 3))) (/ 1 (* (pow cosTheta 2) (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))))))
#s(approx (log (pow (pow alpha (PI)) 2)) #s(hole binary32 (log (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2))))
#s(approx (pow (pow alpha (PI)) 2) #s(hole binary32 (pow (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) 2)))
#s(approx (pow alpha (PI)) #s(hole binary32 (exp (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (/ 1 (* alpha (pow cosTheta 2))) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (/ 1 (* alpha (pow cosTheta 2))) (+ (/ 1 (* alpha (pow cosTheta 4))) (/ 1 (pow cosTheta 2)))) alpha)) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (- (/ 1 (pow cosTheta 2)) (/ 1 (pow cosTheta 4)))) (/ 1 (* alpha (pow cosTheta 2)))) (+ (* -1 (/ (+ 1 (* -1 (pow cosTheta 2))) (* alpha (pow cosTheta 4)))) (+ (* -1 (/ (- (/ 1 (pow cosTheta 2)) (/ 1 (pow cosTheta 4))) alpha)) (/ 1 (* alpha (pow cosTheta 4)))))) alpha)) (/ 1 (pow cosTheta 2))) alpha)) (/ 1 (pow cosTheta 2))) alpha))))
#s(approx (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) #s(hole binary32 (* -1 (* alpha (- (/ 1 alpha) 1)))))
#s(approx (- (* (* alpha alpha) alpha) 1) #s(hole binary32 (* -1 (* (pow alpha 3) (- (/ 1 (pow alpha 3)) 1)))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* 1/2 (/ 1 (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* -1/2 (/ (+ 1 (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 6) (* (PI) (log (/ -1 alpha))))))) (pow alpha 4))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (/ 1/2 (* (pow alpha 6) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1 (/ (+ (* -1/2 (/ (+ 1 (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 6) (* (PI) (log (/ -1 alpha))))))) (* (pow alpha 6) (pow cosTheta 2)))) (+ (* -1/2 (/ (+ 1 (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (pow alpha 4) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (+ 1 (+ (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (* -1 (pow cosTheta 2)))) (* (pow alpha 6) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ (+ 1 (* -1 (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* (pow alpha 6) (* (pow cosTheta 6) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (pow cosTheta 6) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 6))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4)))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* -2 (* (PI) (log (/ -1 alpha))))))
Outputs
(/.f32 (neg.f32 (/.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha)))) (neg.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 (/.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(/.f32 (neg.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32))) (neg.f32 (log.f32 (*.f32 alpha alpha))))
(/.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha)))
(/.f32 (neg.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (neg.f32 (PI.f32)))
(/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (PI.f32) #s(literal 1 binary32))) (*.f32 (PI.f32) (PI.f32)))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32))
(-.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 #s(literal 1 binary32) (PI.f32)))
(expm1.f32 (*.f32 (log.f32 alpha) #s(literal 2 binary32)))
(-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(*.f32 (neg.f32 alpha) (neg.f32 alpha))
(*.f32 (fabs.f32 alpha) (fabs.f32 alpha))
(*.f32 alpha alpha)
(pow.f32 alpha #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 alpha) #s(literal 2 binary32)))
alpha
#s(literal 1 binary32)
(PI.f32)
(log.f32 (*.f32 alpha alpha))
(*.f32 #s(literal 2 binary32) (log.f32 alpha))
(+.f32 (log.f32 alpha) (log.f32 alpha))
(/.f32 (+.f32 (pow.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) #s(literal 3 binary32)) #s(literal 1 binary32)) (+.f32 (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) #s(literal 1 binary32)))))
(fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))
(+.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) #s(literal 1 binary32))
(*.f32 (neg.f32 cosTheta) (neg.f32 cosTheta))
(*.f32 (fabs.f32 cosTheta) (fabs.f32 cosTheta))
(*.f32 cosTheta cosTheta)
(pow.f32 cosTheta #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 cosTheta) #s(literal 2 binary32)))
cosTheta
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (fma.f32 (pow.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) #s(literal 3 binary32)) (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) (*.f32 #s(literal -1/8 binary32) (pow.f32 (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) #s(literal 3 binary32)))) (fma.f32 (neg.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (neg.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
(/.f32 (neg.f32 (fma.f32 (pow.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) #s(literal 3 binary32)) (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) (*.f32 #s(literal -1/8 binary32) (pow.f32 (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) #s(literal 3 binary32))))) (neg.f32 (fma.f32 (neg.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (neg.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
(/.f32 (fma.f32 (pow.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) #s(literal 3 binary32)) (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) (*.f32 #s(literal -1/8 binary32) (pow.f32 (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) #s(literal 3 binary32)))) (fma.f32 (neg.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (neg.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))))
(+.f32 (/.f32 (*.f32 (pow.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) #s(literal 3 binary32)) (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32))) (fma.f32 (neg.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (neg.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))) (/.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) #s(literal 3 binary32))) (fma.f32 (neg.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (neg.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
(*.f32 (fma.f32 (neg.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (neg.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))) (fma.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
(/.f32 (+.f32 (pow.f32 (*.f32 (pow.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) #s(literal 3 binary32)) (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32))) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) #s(literal 3 binary32))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (pow.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) #s(literal 3 binary32)) (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32))) (*.f32 (pow.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) #s(literal 3 binary32)) (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)))) (-.f32 (*.f32 (*.f32 #s(literal -1/8 binary32) (pow.f32 (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) #s(literal 3 binary32))) (*.f32 #s(literal -1/8 binary32) (pow.f32 (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) #s(literal 3 binary32)))) (*.f32 (*.f32 (pow.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) #s(literal 3 binary32)) (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32))) (*.f32 #s(literal -1/8 binary32) (pow.f32 (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) #s(literal 3 binary32)))))))
(fma.f32 (pow.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) #s(literal 3 binary32)) (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) (*.f32 #s(literal -1/8 binary32) (pow.f32 (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) #s(literal 3 binary32))))
(fma.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/8 binary32) (pow.f32 (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) #s(literal 3 binary32))))
(fma.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (*.f32 #s(literal -1/8 binary32) (pow.f32 (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) #s(literal 3 binary32))))
(+.f32 (*.f32 (pow.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) #s(literal 3 binary32)) (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32))) (*.f32 #s(literal -1/8 binary32) (pow.f32 (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) #s(literal 3 binary32))))
(*.f32 (pow.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) #s(literal 3 binary32)) (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)))
(*.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)))
(*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))))
(pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32))
(exp.f32 (*.f32 (log.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) #s(literal 3 binary32)))
(*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))
(/.f32 (+.f32 (pow.f32 (*.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32)) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32)) (*.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32))) (-.f32 (*.f32 (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 (*.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))))))
(fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))
(+.f32 (*.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))
(/.f32 (neg.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (neg.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))
(*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))))
(*.f32 (*.f32 alpha cosTheta) (*.f32 alpha cosTheta))
(*.f32 (*.f32 alpha alpha) (*.f32 cosTheta cosTheta))
(pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 (*.f32 alpha cosTheta)) #s(literal 2 binary32)))
(*.f32 alpha cosTheta)
#s(literal 2 binary32)
(-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))
(*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal -1/2 binary32) (neg.f32 (*.f32 (log.f32 alpha) (PI.f32))))
(/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32)))
#s(literal 1/2 binary32)
(*.f32 (log.f32 alpha) (PI.f32))
(log.f32 alpha)
(/.f32 #s(literal -1 binary32) (neg.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))
(pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal -1 binary32))
(/.f32 (+.f32 (pow.f32 (*.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32)) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (*.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32)) #s(literal 1 binary32)))))
(fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))
(+.f32 (*.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32)) #s(literal 1 binary32))
#s(literal -1 binary32)
(*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))
(/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))
(/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32)))
(/.f32 #s(literal 1/2 binary32) (neg.f32 (*.f32 (log.f32 alpha) (PI.f32))))
#s(literal -1/2 binary32)
(/.f32 (neg.f32 (*.f32 cosTheta cosTheta)) (neg.f32 (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))))
(/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))
(*.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))
(pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal 2 binary32)))
#s(literal 3 binary32)
(*.f32 #s(literal -1/8 binary32) (pow.f32 (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) #s(literal 3 binary32)))
(*.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))
(*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
(pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))
(exp.f32 (*.f32 (log.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) #s(literal 3 binary32)))
(*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))
(*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))
(/.f32 #s(literal -1 binary32) (neg.f32 (*.f32 (log.f32 alpha) (PI.f32))))
(/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32)))
(pow.f32 (*.f32 (log.f32 alpha) (PI.f32)) #s(literal -1 binary32))
(/.f32 (+.f32 (pow.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)))) (-.f32 (*.f32 (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))) (*.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))))))
(fma.f32 (neg.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (neg.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))
(fma.f32 (fabs.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (fabs.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))
(fma.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))
(+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))
(*.f32 (neg.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (neg.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))))
(*.f32 (fabs.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (fabs.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))))
(*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)))
(pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 2 binary32))
(-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
(*.f32 (neg.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (neg.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
(*.f32 (fabs.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (fabs.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
(*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))
(pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 2 binary32))
(*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))
(*.f32 #s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))))))
(*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))))
(/.f32 (+.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) #s(literal 3 binary32)) (pow.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))) #s(literal 3 binary32))) (+.f32 (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))) (-.f32 (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))))))
(/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (*.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)) #s(literal 1 binary32))) (*.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)) (*.f32 alpha (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))))
(+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))))
(/.f32 #s(literal -1 binary32) (neg.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))
(/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))
(pow.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)) #s(literal -1 binary32))
(log.f32 (*.f32 (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))
(*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))
(*.f32 #s(literal 2 binary32) (log.f32 (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))
(*.f32 (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))
(pow.f32 (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))
(+.f32 (cosh.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (sinh.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))
(exp.f32 (*.f32 (log.f32 (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))) #s(literal 2 binary32)))
(exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))
(log.f32 (*.f32 (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))
(*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))
(*.f32 #s(literal 2 binary32) (log.f32 (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))
(*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))
(log.f32 (pow.f32 (/.f32 #s(literal 1 binary32) alpha) (PI.f32)))
(*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))
(log.f32 (/.f32 #s(literal 1 binary32) alpha))
(*.f32 #s(literal -1 binary32) (log.f32 alpha))
(-.f32 #s(literal 0 binary32) (log.f32 alpha))
(neg.f32 (log.f32 alpha))
#s(literal 0 binary32)
(/.f32 #s(literal -1 binary32) (neg.f32 (*.f32 alpha (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))))
(/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))
(pow.f32 (*.f32 alpha (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) #s(literal -1 binary32))
(log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))) alpha))
(*.f32 alpha (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))
(pow.f32 (*.f32 (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))) alpha)
(exp.f32 (*.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)) alpha))
(/.f32 (neg.f32 (-.f32 alpha #s(literal 1 binary32))) (neg.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(-.f32 (/.f32 alpha (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(-.f32 alpha #s(literal 1 binary32))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 (*.f32 (+.f32 alpha #s(literal 1 binary32)) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32)))))) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 (neg.f32 (+.f32 alpha #s(literal 1 binary32))) (neg.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))))
(/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))
(+.f32 (/.f32 alpha (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))))
(/.f32 (fma.f32 (*.f32 alpha alpha) alpha #s(literal 1 binary32)) (fma.f32 alpha alpha (-.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32)))))
(+.f32 alpha #s(literal 1 binary32))
(log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))
(*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)))
(*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32)))
(pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))
(pow.f32 alpha (*.f32 (PI.f32) #s(literal 2 binary32)))
(exp.f32 (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32)))
(pow.f32 alpha (PI.f32))
(exp.f32 (*.f32 (log.f32 alpha) (PI.f32)))
(/.f32 (neg.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32)))))) (neg.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(/.f32 (neg.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32))) (neg.f32 (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))))
(/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32)))))
(-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) alpha) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (/.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))))
(expm1.f32 (*.f32 (log.f32 alpha) #s(literal 3 binary32)))
(-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32))
(*.f32 (*.f32 alpha alpha) alpha)
(*.f32 alpha (*.f32 alpha alpha))
(pow.f32 alpha #s(literal 3 binary32))
(exp.f32 (*.f32 (log.f32 alpha) #s(literal 3 binary32)))
(/.f32 (fma.f32 (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha)) (*.f32 alpha alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))) #s(literal 3 binary32))) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32)))) (*.f32 (*.f32 alpha alpha) (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32)))))))
(fma.f32 (neg.f32 alpha) (neg.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))
(fma.f32 (fabs.f32 alpha) (fabs.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))
(fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))
(+.f32 (*.f32 alpha alpha) (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))
(/.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha #s(literal 1 binary32)) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 alpha #s(literal 1 binary32)) (*.f32 alpha #s(literal 1 binary32))) (*.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))))
(+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32)))
(*.f32 alpha #s(literal 1 binary32))
(/.f32 (neg.f32 #s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))) (neg.f32 (*.f32 (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta)))))
(/.f32 #s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
(*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))
(-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))
(/.f32 #s(literal -1 binary32) (neg.f32 (*.f32 alpha alpha)))
(/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))
(pow.f32 (*.f32 alpha alpha) #s(literal -1 binary32))
(pow.f32 alpha #s(literal -2 binary32))
(*.f32 (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta)))
(log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)))
(*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)))
(/.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta)) (*.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta)))))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))
(*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta)
(*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta)
(/.f32 (neg.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32))) (neg.f32 (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
(/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
(-.f32 (/.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (/.f32 #s(literal 1 binary32) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
(expm1.f32 (*.f32 (log.f32 (*.f32 alpha alpha)) #s(literal 3 binary32)))
(-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32))
(*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha)) (*.f32 alpha alpha))
(*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 alpha alpha) alpha))
(*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha)))
(pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32))
(exp.f32 (*.f32 (log.f32 (*.f32 alpha alpha)) #s(literal 3 binary32)))
(/.f32 (+.f32 (pow.f32 (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha)) (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha))) (-.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
(fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(fma.f32 (neg.f32 (neg.f32 (*.f32 alpha alpha))) (neg.f32 (neg.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(fma.f32 (fabs.f32 (neg.f32 (*.f32 alpha alpha))) (fabs.f32 (neg.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(fma.f32 (*.f32 alpha alpha) (*.f32 alpha alpha) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(+.f32 (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
(neg.f32 (*.f32 alpha alpha))
(/.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
(*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (log.f32 (*.f32 alpha alpha)))) (/.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (/.f32 (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)))) (/.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32)) (log.f32 (*.f32 alpha alpha))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))))) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))) (/.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(literal 1 binary32))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
#s(approx (* cosTheta cosTheta) (*.f32 cosTheta cosTheta))
#s(approx cosTheta cosTheta)
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (log.f32 (*.f32 alpha alpha)))) (/.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (/.f32 (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)))) (/.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32)) (log.f32 (*.f32 alpha alpha))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))))) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))) (/.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (/.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (+.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (*.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))))))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (/.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (pow (* alpha cosTheta) 2) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))
#s(approx (* alpha cosTheta) (*.f32 alpha cosTheta))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) #s(literal 1 binary32))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (+.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) #s(literal 1 binary32))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (*.f32 cosTheta cosTheta))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 #s(literal 2 binary32) (*.f32 #s(literal 3 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (+.f32 #s(literal 3 binary32) (*.f32 #s(literal 4 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) #s(literal 1 binary32))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -2 binary32) (*.f32 cosTheta cosTheta))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 cosTheta cosTheta) #s(literal 2 binary32)))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) (/.f32 #s(literal -1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) (-.f32 (*.f32 #s(literal -3/8 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -3/4 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -5/4 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (fma.f32 (*.f32 cosTheta cosTheta) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (fma.f32 (*.f32 cosTheta cosTheta) (+.f32 (*.f32 #s(literal 3/4 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (fma.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 (*.f32 cosTheta cosTheta) (/.f32 (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 alpha #s(literal 1 binary32)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (+.f32 alpha (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) #s(literal 1 binary32)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (+.f32 alpha (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) #s(literal 1 binary32)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (+.f32 alpha (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))) (*.f32 #s(literal -1 binary32) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) #s(literal 1 binary32)))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)))) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 (*.f32 cosTheta cosTheta) (/.f32 (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32))))) (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32))))) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)) (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)))) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha)))))) (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32))) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha)))))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32))) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha)))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha)))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha)))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)))) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) alpha) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)))) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha)))) (/.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32))) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))))) (/.f32 (*.f32 (*.f32 alpha alpha) alpha) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)) (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)))) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32))) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))))))) (/.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32))) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))))) (/.f32 (*.f32 (*.f32 alpha alpha) alpha) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)))) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (/.f32 (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)))) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)))) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (*.f32 (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32))) (*.f32 (log.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32))) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (/.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32))) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (fma.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(literal 1 binary32))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32))) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/.f32 (*.f32 cosTheta (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32))) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))) #s(literal 1 binary32))) (*.f32 (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))) #s(literal 1 binary32))) (*.f32 (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) #s(literal 1 binary32))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))))) (*.f32 cosTheta cosTheta)))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 alpha alpha)) #s(literal 1 binary32))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))) #s(literal 1 binary32))) (*.f32 (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))) #s(literal 1 binary32))) (*.f32 (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) #s(literal 1 binary32))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta)))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))))) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 #s(literal 4 binary32) (/.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))))))))) (pow.f32 cosTheta #s(literal 4 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (/.f32 (-.f32 (fma.f32 #s(literal 4 binary32) (/.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (fma.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))) (pow.f32 cosTheta #s(literal 6 binary32))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))))) (pow.f32 cosTheta #s(literal 4 binary32))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (fma.f32 #s(literal 2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))))))) (pow.f32 cosTheta #s(literal 6 binary32))) (fma.f32 #s(literal 4 binary32) (/.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))))))))) (pow.f32 cosTheta #s(literal 4 binary32))) (fma.f32 #s(literal 4 binary32) (/.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))))))))))))))) (pow.f32 cosTheta #s(literal 6 binary32))) (*.f32 #s(literal 4 binary32) (/.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))))))) (pow.f32 cosTheta #s(literal 6 binary32)))))))))) (*.f32 cosTheta cosTheta)))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (/.f32 (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (pow.f32 cosTheta #s(literal 6 binary32))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (/.f32 (+.f32 (/.f32 #s(literal 3/8 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))) (pow.f32 cosTheta #s(literal 6 binary32))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (/.f32 (+.f32 (/.f32 #s(literal 3/8 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (+.f32 (/.f32 #s(literal 5/4 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 6 binary32))))))) (pow.f32 cosTheta #s(literal 6 binary32))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 12 binary32))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (/.f32 (fma.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 cosTheta cosTheta))) (pow.f32 cosTheta #s(literal 12 binary32))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (/.f32 (fma.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 cosTheta cosTheta)) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 2 binary32) (*.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (fma.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))))) (pow.f32 cosTheta #s(literal 4 binary32))))) (pow.f32 cosTheta #s(literal 12 binary32))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (/.f32 (fma.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (+.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (+.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))))))) (pow.f32 cosTheta #s(literal 6 binary32))) (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 cosTheta cosTheta)) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 2 binary32) (*.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (fma.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))))) (pow.f32 cosTheta #s(literal 4 binary32)))))) (pow.f32 cosTheta #s(literal 12 binary32))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (/.f32 (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (/.f32 (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 (fma.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 cosTheta cosTheta)))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (/.f32 (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (+.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 6 binary32))) (/.f32 (fma.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 cosTheta cosTheta))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))))) (pow.f32 cosTheta #s(literal 6 binary32))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 #s(literal 2 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (log.f32 alpha))))))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (/.f32 (-.f32 (fma.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (/.f32 (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 6 binary32))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta)))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) #s(literal 3/2 binary32))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 4 binary32)))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (/.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 cosTheta cosTheta))))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 cosTheta cosTheta))) #s(literal 1 binary32)) (*.f32 cosTheta cosTheta)))
#s(approx (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 cosTheta #s(literal 4 binary32)))) (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 cosTheta cosTheta)))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))
#s(approx (+ (* (* cosTheta cosTheta) -1) 1) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) #s(literal 1 binary32))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 4 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (/.f32 #s(literal 3 binary32) (pow.f32 cosTheta #s(literal 4 binary32))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 cosTheta #s(literal 6 binary32))) (/.f32 #s(literal 3 binary32) (pow.f32 cosTheta #s(literal 4 binary32)))))) (*.f32 cosTheta cosTheta)))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) (pow.f32 cosTheta #s(literal 4 binary32)))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (pow (+ (* (* cosTheta cosTheta) -1) 1) 2) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 cosTheta #s(literal 4 binary32)))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) (/.f32 (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (pow.f32 cosTheta #s(literal 6 binary32))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) (/.f32 (+.f32 (/.f32 #s(literal 3/8 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))) (pow.f32 cosTheta #s(literal 6 binary32))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) (/.f32 (+.f32 (/.f32 #s(literal 3/8 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))) (pow.f32 cosTheta #s(literal 6 binary32))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta)))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta)))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal -1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (*.f32 #s(literal -1 binary32) (/.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 1 binary32))) (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 1 binary32))) (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 cosTheta cosTheta))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 1 binary32))) (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (pow.f32 cosTheta #s(literal 4 binary32)))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 1 binary32))) (*.f32 (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 cosTheta cosTheta)))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (/.f32 #s(literal 1/4 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (*.f32 cosTheta cosTheta)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (+.f32 (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32)))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (*.f32 cosTheta cosTheta)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (/.f32 (-.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 6 binary32))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32)))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 6 binary32))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (*.f32 cosTheta cosTheta)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 8 binary32))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (/.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (pow.f32 cosTheta #s(literal 8 binary32))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (/.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta)) (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32))))) (pow.f32 cosTheta #s(literal 8 binary32))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (/.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta)) (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (pow.f32 cosTheta #s(literal 6 binary32))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32)))))) (pow.f32 cosTheta #s(literal 8 binary32))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (/.f32 #s(literal 1/4 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (*.f32 cosTheta cosTheta)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (*.f32 cosTheta cosTheta)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 6 binary32))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (*.f32 cosTheta cosTheta)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 #s(literal 1/4 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (pow.f32 cosTheta #s(literal 4 binary32))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (pow.f32 cosTheta #s(literal 6 binary32))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 cosTheta cosTheta)) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))) (pow.f32 cosTheta #s(literal 6 binary32))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 4 binary32))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 cosTheta cosTheta)) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 6 binary32))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))))) (pow.f32 cosTheta #s(literal 6 binary32))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (pow.f32 cosTheta #s(literal 4 binary32))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 cosTheta cosTheta)) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 6 binary32))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 cosTheta cosTheta)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 cosTheta cosTheta)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (-.f32 (fma.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (pow.f32 cosTheta #s(literal 4 binary32))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 cosTheta cosTheta)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (pow.f32 cosTheta #s(literal 6 binary32))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (pow.f32 cosTheta #s(literal 4 binary32))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 cosTheta cosTheta)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (/.f32 alpha (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) alpha)) (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (+.f32 (/.f32 alpha (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))) (/.f32 alpha (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) alpha)) (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32)))) (+.f32 (/.f32 alpha (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))) (/.f32 alpha (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))) (+.f32 (/.f32 #s(literal 1 binary32) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (/.f32 (fma.f32 alpha (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) alpha)) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32)))))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 cosTheta cosTheta)) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 cosTheta cosTheta)) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (-.f32 (/.f32 (fma.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))) (*.f32 (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32))))) (*.f32 (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 cosTheta cosTheta)) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (pow.f32 cosTheta #s(literal 6 binary32))) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32)))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (pow.f32 cosTheta #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 cosTheta cosTheta)) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (/.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (+.f32 (/.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (/.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))) (/.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))))) (+.f32 (/.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (/.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))) (+.f32 (/.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (+.f32 #s(literal 1 binary32) (+.f32 alpha (*.f32 alpha alpha))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))))) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (*.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (pow.f32 alpha #s(literal 6 binary32)))) (*.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))))) (/.f32 (fma.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (*.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (pow.f32 alpha #s(literal 6 binary32)))) (*.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (*.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (pow.f32 alpha #s(literal 6 binary32)))) (*.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (pow.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) #s(literal 4 binary32))))))) (/.f32 (fma.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (*.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (pow.f32 alpha #s(literal 6 binary32)))) (*.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))))) (/.f32 (fma.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (pow.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) #s(literal 4 binary32)))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (pow.f32 alpha #s(literal 6 binary32)))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))) (pow.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) #s(literal 4 binary32))))))))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (PI.f32) (*.f32 (log.f32 (*.f32 alpha alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32))) (*.f32 cosTheta cosTheta)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 cosTheta cosTheta) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (PI)) (/.f32 #s(literal -1 binary32) (PI.f32)))
#s(approx (/ (- (* alpha alpha) 1) (PI)) (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)))
#s(approx (- (* alpha alpha) 1) #s(literal -1 binary32))
#s(approx (- (* alpha alpha) 1) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
#s(approx (* alpha alpha) (*.f32 alpha alpha))
#s(approx alpha alpha)
#s(approx (log (* alpha alpha)) (log.f32 (*.f32 alpha alpha)))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))))))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))))) (fma.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))) (fma.f32 #s(literal 4 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))))))))) (fma.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))))))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (/.f32 #s(literal -1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (-.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (-.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (-.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (+.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (+.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (log alpha) (PI)) (*.f32 (PI.f32) (log.f32 alpha)))
#s(approx (log alpha) (log.f32 alpha))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))
#s(approx (/ -1/2 (* (log alpha) (PI))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) (/.f32 #s(literal -1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ 1 (* (log alpha) (PI))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (/.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (fma.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (/.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (fma.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 #s(literal -1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 (*.f32 alpha alpha) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/.f32 (+.f32 #s(literal 1 binary32) alpha) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) (fma.f32 alpha (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/8 binary32) (/.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) (fma.f32 alpha (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 alpha (fma.f32 #s(literal -1/32 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1/24 binary32) (/.f32 (fma.f32 #s(literal -24 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (fma.f32 #s(literal 8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (*.f32 #s(literal 16 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/8 binary32) (/.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) (fma.f32 alpha (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 alpha (fma.f32 #s(literal -1 binary32) (*.f32 alpha (fma.f32 #s(literal -1/4 binary32) (*.f32 (/.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/32 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1/24 binary32) (/.f32 (fma.f32 #s(literal -24 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (fma.f32 #s(literal 8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (*.f32 #s(literal 16 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (log.f32 alpha))) (fma.f32 #s(literal -1/96 binary32) (*.f32 (/.f32 (fma.f32 #s(literal -24 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (fma.f32 #s(literal 8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (*.f32 #s(literal 16 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (pow.f32 (PI.f32) #s(literal 3 binary32))) (/.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1/96 binary32) (/.f32 (fma.f32 #s(literal -96 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)) (fma.f32 #s(literal -64 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)) (fma.f32 #s(literal -48 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)) (fma.f32 #s(literal 16 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)) (*.f32 #s(literal 192 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32))))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (*.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1/32 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1/24 binary32) (/.f32 (fma.f32 #s(literal -24 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (fma.f32 #s(literal 8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (*.f32 #s(literal 16 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) (/.f32 #s(literal 1/2 binary32) (*.f32 alpha (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) (/.f32 (fma.f32 alpha (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/8 binary32) (/.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) alpha))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) (/.f32 (fma.f32 alpha (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 alpha (fma.f32 #s(literal -1/32 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1/24 binary32) (/.f32 (fma.f32 #s(literal -24 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (fma.f32 #s(literal 8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (*.f32 #s(literal 16 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/8 binary32) (/.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) alpha))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) (/.f32 (fma.f32 alpha (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 alpha (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 alpha (fma.f32 #s(literal -1/4 binary32) (*.f32 (/.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/32 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1/24 binary32) (/.f32 (fma.f32 #s(literal -24 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (fma.f32 #s(literal 8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (*.f32 #s(literal 16 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (log.f32 alpha))) (fma.f32 #s(literal -1/96 binary32) (*.f32 (/.f32 (fma.f32 #s(literal -24 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (fma.f32 #s(literal 8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (*.f32 #s(literal 16 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (pow.f32 (PI.f32) #s(literal 3 binary32))) (/.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1/96 binary32) (/.f32 (fma.f32 #s(literal -96 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)) (fma.f32 #s(literal -64 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)) (fma.f32 #s(literal -48 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)) (fma.f32 #s(literal 16 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)) (*.f32 #s(literal 192 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32))))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (fma.f32 #s(literal -1/32 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1/24 binary32) (/.f32 (fma.f32 #s(literal -24 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (fma.f32 #s(literal 8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (*.f32 #s(literal 16 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) alpha))
#s(approx (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))
#s(approx (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) (pow.f32 (exp.f32 #s(literal 2 binary32)) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))
#s(approx (* -1 (* (PI) (- 0 (log alpha)))) (*.f32 (PI.f32) (log.f32 alpha)))
#s(approx (* (PI) (- 0 (log alpha))) (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (- 0 (log alpha)) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))
#s(approx (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) (/.f32 #s(literal 1/2 binary32) (*.f32 alpha (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) (/.f32 (fma.f32 #s(literal -1/8 binary32) (*.f32 (/.f32 alpha (*.f32 (PI.f32) (PI.f32))) (/.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) alpha))
#s(approx (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) (/.f32 (fma.f32 alpha (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 alpha (fma.f32 #s(literal -1/32 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1/24 binary32) (/.f32 (fma.f32 #s(literal -24 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (fma.f32 #s(literal 8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (*.f32 #s(literal 16 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) alpha))
#s(approx (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))) (/.f32 (fma.f32 alpha (-.f32 (*.f32 alpha (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 alpha (fma.f32 #s(literal -1/4 binary32) (*.f32 (/.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/32 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1/24 binary32) (/.f32 (fma.f32 #s(literal -24 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (fma.f32 #s(literal 8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (*.f32 #s(literal 16 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (log.f32 alpha))) (fma.f32 #s(literal -1/96 binary32) (*.f32 (/.f32 (fma.f32 #s(literal -24 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (fma.f32 #s(literal 8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (*.f32 #s(literal 16 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (pow.f32 (PI.f32) #s(literal 3 binary32))) (/.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1/96 binary32) (/.f32 (fma.f32 #s(literal -96 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)) (fma.f32 #s(literal -64 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)) (fma.f32 #s(literal -48 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)) (fma.f32 #s(literal 16 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)) (*.f32 #s(literal 192 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32))))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (fma.f32 #s(literal -1/32 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1/24 binary32) (/.f32 (fma.f32 #s(literal -24 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (fma.f32 #s(literal 8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (*.f32 #s(literal 16 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) alpha))
#s(approx (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) (*.f32 #s(literal 2 binary32) (*.f32 alpha (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) (*.f32 alpha (fma.f32 #s(literal 1/2 binary32) (*.f32 alpha (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))))
#s(approx (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) (*.f32 alpha (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 alpha (fma.f32 #s(literal 1/6 binary32) (*.f32 alpha (fma.f32 #s(literal -24 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (fma.f32 #s(literal 8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (*.f32 #s(literal 16 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))) (*.f32 #s(literal 1/2 binary32) (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
#s(approx (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)) (*.f32 alpha (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 alpha (fma.f32 #s(literal 1/2 binary32) (fma.f32 #s(literal -4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 alpha (fma.f32 #s(literal 1/24 binary32) (*.f32 alpha (fma.f32 #s(literal -96 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)) (fma.f32 #s(literal -64 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)) (fma.f32 #s(literal -48 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)) (fma.f32 #s(literal 16 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)) (*.f32 #s(literal 192 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32)))))))) (*.f32 #s(literal 1/6 binary32) (fma.f32 #s(literal -24 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (fma.f32 #s(literal 8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) (*.f32 #s(literal 16 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))))))))))
#s(approx (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) #s(literal 1 binary32))
#s(approx (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (*.f32 alpha (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) (+.f32 #s(literal 1 binary32) (*.f32 alpha (fma.f32 #s(literal 2 binary32) (*.f32 alpha (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))))))
#s(approx (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) (+.f32 #s(literal 1 binary32) (*.f32 alpha (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 alpha (fma.f32 #s(literal 4/3 binary32) (*.f32 alpha (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 #s(literal -1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (*.f32 alpha (*.f32 cosTheta cosTheta)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (*.f32 alpha (fma.f32 alpha (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha (*.f32 cosTheta cosTheta)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (- alpha 1) #s(literal -1 binary32))
#s(approx (- alpha 1) (-.f32 alpha #s(literal 1 binary32)))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 #s(literal -1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 alpha (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 alpha (-.f32 (fma.f32 alpha (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))) (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (+ alpha 1) #s(literal 1 binary32))
#s(approx (+ alpha 1) (+.f32 #s(literal 1 binary32) alpha))
#s(approx (log (pow (pow alpha (PI)) 2)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))
#s(approx (pow (pow alpha (PI)) 2) (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))
#s(approx (pow alpha (PI)) (pow.f32 alpha (PI.f32)))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 #s(literal -1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (*.f32 alpha (fma.f32 #s(literal -1 binary32) (*.f32 alpha (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (*.f32 alpha (fma.f32 alpha (-.f32 (*.f32 alpha (-.f32 (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (fma.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) #s(literal -1 binary32))
#s(approx (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (-.f32 alpha #s(literal 1 binary32)))
#s(approx (- (* (* alpha alpha) alpha) 1) #s(literal -1 binary32))
#s(approx (- (* (* alpha alpha) alpha) 1) (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)))
#s(approx (* (* alpha alpha) alpha) (*.f32 (*.f32 alpha alpha) alpha))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) #s(literal 1 binary32))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) (+.f32 #s(literal 1 binary32) alpha))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha (+.f32 #s(literal 1 binary32) alpha))))
#s(approx (+ 1 (* alpha 1)) #s(literal 1 binary32))
#s(approx (+ 1 (* alpha 1)) (+.f32 #s(literal 1 binary32) alpha))
#s(approx (* alpha 1) alpha)
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 #s(literal 2 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (PI.f32)) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(literal -1 binary32))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
#s(approx (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) #s(literal -1 binary32))
#s(approx (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
#s(approx (- 1 (/ 1 (* alpha alpha))) (/.f32 #s(literal -1 binary32) (*.f32 alpha alpha)))
#s(approx (- 1 (/ 1 (* alpha alpha))) (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 alpha alpha)))
#s(approx (/ 1 (* alpha alpha)) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (+.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))))))))))))
#s(approx (* (PI) (log (* alpha alpha))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 #s(literal -1 binary32) cosTheta))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (fma.f32 #s(literal -1 binary32) cosTheta (*.f32 (*.f32 alpha alpha) cosTheta)))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (fma.f32 #s(literal -1 binary32) cosTheta (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (+.f32 cosTheta (*.f32 #s(literal -1 binary32) cosTheta)))) (*.f32 #s(literal -1 binary32) cosTheta)))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (+.f32 (*.f32 #s(literal -1 binary32) cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (+.f32 cosTheta (*.f32 #s(literal -1 binary32) cosTheta))) (+.f32 cosTheta (*.f32 #s(literal -1 binary32) cosTheta)))) (*.f32 #s(literal -1 binary32) cosTheta)))))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(literal -1 binary32))
#s(approx (- (pow (* alpha alpha) 3) 1) (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)))
#s(approx (pow (* alpha alpha) 3) (pow.f32 alpha #s(literal 6 binary32)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(literal 1 binary32))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (neg (* alpha alpha)) (*.f32 #s(literal -1 binary32) (*.f32 alpha alpha)))
#s(approx (+ 1 (* (* alpha alpha) 1)) #s(literal 1 binary32))
#s(approx (+ 1 (* (* alpha alpha) 1)) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))
#s(approx (* (* alpha alpha) 1) (*.f32 alpha alpha))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))))
#s(approx (/ (- (* alpha alpha) 1) (PI)) (/.f32 (*.f32 alpha alpha) (PI.f32)))
#s(approx (/ (- (* alpha alpha) 1) (PI)) (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 #s(literal 1 binary32) (PI.f32)) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (PI.f32))))))
#s(approx (- (* alpha alpha) 1) (*.f32 alpha alpha))
#s(approx (- (* alpha alpha) 1) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (log (* alpha alpha)) (*.f32 #s(literal -2 binary32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 cosTheta cosTheta)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (pow.f32 cosTheta #s(literal 4 binary32))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 alpha alpha)) (/.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))))) (*.f32 #s(literal -2 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 alpha alpha))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 alpha alpha)) (/.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))))))) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))) (/.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 #s(literal -2 binary32) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -2 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 alpha alpha)) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (pow.f32 cosTheta #s(literal 4 binary32)))) (+.f32 (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 alpha alpha)) (/.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))))))) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))) (/.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 #s(literal -2 binary32) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (-.f32 (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))) (/.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))) (/.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 #s(literal -2 binary32) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 cosTheta cosTheta)) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 cosTheta cosTheta)) (/.f32 (-.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))))) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -2 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 alpha alpha)) (fma.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (fma.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (*.f32 (-.f32 (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))) (/.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 #s(literal -2 binary32) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (-.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))))))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (/.f32 (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (fma.f32 #s(literal 2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (fma.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (+.f32 (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (pow.f32 alpha #s(literal 6 binary32)))) (fma.f32 #s(literal 2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (fma.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (/.f32 (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (fma.f32 #s(literal 2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (fma.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (+.f32 (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (pow.f32 alpha #s(literal 6 binary32)))) (fma.f32 #s(literal 2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (fma.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 alpha alpha)) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 alpha alpha)) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (*.f32 #s(literal -1 binary32) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))
#s(approx (* (log alpha) (PI)) (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))
#s(approx (log alpha) (*.f32 #s(literal -1 binary32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))
#s(approx (/ -1/2 (* (log alpha) (PI))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ 1 (* (log alpha) (PI))) (/.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (/.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (/.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (+.f32 (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (pow.f32 alpha #s(literal 4 binary32))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (/.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (pow.f32 alpha #s(literal 6 binary32))) (+.f32 (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (pow.f32 alpha #s(literal 4 binary32)))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (/.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (/.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (+.f32 (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (pow.f32 alpha #s(literal 4 binary32)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (PI.f32)) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 alpha alpha))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 1/4 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (PI.f32)) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))) #s(literal 1 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 8 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/.f32 alpha (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) (*.f32 alpha (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))))
#s(approx (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))
#s(approx (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) (*.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))
#s(approx (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) (pow.f32 (exp.f32 #s(literal -2 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))
#s(approx (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) (*.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))
#s(approx (* -1 (* (PI) (- 0 (log alpha)))) (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))
#s(approx (* (PI) (- 0 (log alpha))) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))
#s(approx (- 0 (log alpha)) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))
#s(approx (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha) (pow.f32 (exp.f32 #s(literal 2 binary32)) (*.f32 alpha (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) alpha) (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta))) alpha)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 (*.f32 alpha (*.f32 cosTheta cosTheta)) #s(literal 1 binary32))) (*.f32 (*.f32 alpha (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 alpha alpha) (pow.f32 cosTheta #s(literal 4 binary32)))))) alpha))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (pow.f32 cosTheta #s(literal 4 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (*.f32 alpha alpha) (pow.f32 cosTheta #s(literal 4 binary32))) #s(literal 1 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 cosTheta cosTheta)))))) alpha))
#s(approx (- alpha 1) alpha)
#s(approx (- alpha 1) (*.f32 alpha (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) alpha))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))))) (pow.f32 alpha #s(literal 5 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))) #s(literal 1 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))))))))
#s(approx (+ alpha 1) alpha)
#s(approx (+ alpha 1) (*.f32 alpha (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) alpha))))
#s(approx (log (pow (pow alpha (PI)) 2)) (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) #s(literal 2 binary32)))
#s(approx (pow (pow alpha (PI)) 2) (*.f32 (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))
#s(approx (pow alpha (PI)) (pow.f32 (exp.f32 #s(literal -1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) alpha) (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta))) alpha)))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 (*.f32 alpha (*.f32 cosTheta cosTheta)) #s(literal 1 binary32))) (*.f32 (*.f32 alpha (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 alpha alpha) (pow.f32 cosTheta #s(literal 4 binary32)))))) alpha))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (pow.f32 cosTheta #s(literal 4 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) alpha)) (+.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 (*.f32 alpha (*.f32 cosTheta cosTheta)) #s(literal 1 binary32))) (*.f32 (*.f32 alpha (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 alpha alpha) (pow.f32 cosTheta #s(literal 4 binary32)))))) alpha))
#s(approx (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) alpha)
#s(approx (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (*.f32 alpha (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) alpha))))
#s(approx (- (* (* alpha alpha) alpha) 1) (*.f32 (*.f32 alpha alpha) alpha))
#s(approx (- (* (* alpha alpha) alpha) 1) (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) alpha)))))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) (*.f32 alpha alpha))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) (*.f32 (*.f32 alpha alpha) (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) alpha))))
#s(approx (+ (* alpha alpha) (+ 1 (* alpha 1))) (*.f32 (*.f32 alpha alpha) (+.f32 #s(literal 1 binary32) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 alpha alpha) (*.f32 alpha #s(literal 1 binary32))) (*.f32 (*.f32 alpha alpha) alpha)))))
#s(approx (+ 1 (* alpha 1)) alpha)
#s(approx (+ 1 (* alpha 1)) (*.f32 alpha (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) alpha))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))) #s(literal 1/2 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 cosTheta cosTheta))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))))))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 alpha alpha))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) (*.f32 alpha alpha))
#s(approx (* (* alpha alpha) (- 1 (/ 1 (* alpha alpha)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (- 1 (/ 1 (* alpha alpha))) #s(literal 1 binary32))
#s(approx (- 1 (/ 1 (* alpha alpha))) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 #s(literal -2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha)) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 6 binary32))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha)) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal -1 binary32) (log.f32 alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 4 binary32)))))))))
#s(approx (* (PI) (log (* alpha alpha))) (*.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (*.f32 #s(literal -1 binary32) (log.f32 alpha)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 alpha alpha) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 cosTheta cosTheta)) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (pow.f32 alpha #s(literal 4 binary32))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 cosTheta cosTheta))) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 6 binary32))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (+.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 6 binary32))) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (*.f32 (*.f32 alpha alpha) (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (*.f32 cosTheta cosTheta))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (pow.f32 alpha #s(literal 4 binary32))) (*.f32 cosTheta cosTheta)) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 6 binary32))) (+.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 6 binary32))) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (*.f32 (*.f32 alpha alpha) (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 (*.f32 alpha alpha) cosTheta))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 (*.f32 alpha alpha) (+.f32 cosTheta (*.f32 #s(literal -1 binary32) (/.f32 cosTheta (*.f32 alpha alpha))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (+.f32 cosTheta (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 cosTheta (*.f32 #s(literal -1 binary32) cosTheta)) (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 cosTheta (*.f32 alpha alpha)))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (+.f32 cosTheta (fma.f32 #s(literal -1 binary32) (/.f32 cosTheta (pow.f32 alpha #s(literal 6 binary32))) (/.f32 cosTheta (pow.f32 alpha #s(literal 6 binary32))))) (fma.f32 #s(literal -1 binary32) (/.f32 cosTheta (pow.f32 alpha #s(literal 4 binary32))) (+.f32 (/.f32 cosTheta (*.f32 alpha alpha)) (/.f32 cosTheta (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (- (pow (* alpha alpha) 3) 1) (pow.f32 alpha #s(literal 6 binary32)))
#s(approx (- (pow (* alpha alpha) 3) 1) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 alpha #s(literal 6 binary32))))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (pow.f32 alpha #s(literal 4 binary32)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (+.f32 #s(literal 1 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (/.f32 #s(literal 1 binary32) (pow.f32 alpha #s(literal 4 binary32)))))))
#s(approx (+ 1 (* (* alpha alpha) 1)) (*.f32 alpha alpha))
#s(approx (+ 1 (* (* alpha alpha) 1)) (*.f32 (*.f32 alpha alpha) (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 cosTheta cosTheta))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))))
#s(approx (/ (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (pow.f32 cosTheta #s(literal 4 binary32))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))
#s(approx (/ (/ (- (* alpha alpha) 1) (PI)) (log (* alpha alpha))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))))
#s(approx (log (* alpha alpha)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -2 binary32))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 cosTheta cosTheta))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (pow.f32 cosTheta #s(literal 4 binary32))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 alpha alpha)) (/.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))))) (*.f32 #s(literal 2 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 alpha alpha)) (/.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))))) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))) (/.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 #s(literal 2 binary32) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 #s(literal 2 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (/.f32 (fma.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))))))) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (-.f32 (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))) (/.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))) (/.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 #s(literal 2 binary32) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 cosTheta cosTheta)) (*.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 cosTheta cosTheta)) (/.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))))) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))) (/.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 #s(literal 2 binary32) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (fma.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (fma.f32 #s(literal 2 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha)) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (*.f32 (-.f32 (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))) (/.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 #s(literal 2 binary32) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))))))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))) (fma.f32 #s(literal 2 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))) (fma.f32 #s(literal 2 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))
#s(approx (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))) (fma.f32 #s(literal 2 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (fma.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (pow.f32 alpha #s(literal 6 binary32))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))) (fma.f32 #s(literal 2 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))) (fma.f32 #s(literal 2 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))
#s(approx (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))) (fma.f32 #s(literal 2 binary32) (*.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (fma.f32 (/.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 alpha alpha)) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32)) (pow.f32 alpha #s(literal 6 binary32))))))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2)))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ 1/2 (* (log alpha) (PI))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (* (log alpha) (PI)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))
#s(approx (log alpha) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))
#s(approx (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ -1/2 (* (log alpha) (PI))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3) (/.f32 #s(literal -1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) #s(literal 3 binary32)))))
#s(approx (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ 1 (* (log alpha) (PI))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (+.f32 (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (pow.f32 alpha #s(literal 4 binary32))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (pow.f32 alpha #s(literal 6 binary32))) (+.f32 (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (pow.f32 alpha #s(literal 4 binary32)))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (fma.f32 #s(literal -2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (+.f32 (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (pow.f32 alpha #s(literal 4 binary32)))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (PI.f32)) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 alpha alpha))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 1/4 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) #s(literal 2 binary32))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (/.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) #s(literal 2 binary32)))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (PI.f32)) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 alpha alpha)) (*.f32 #s(literal 1/2 binary32) (*.f32 (/.f32 (*.f32 cosTheta cosTheta) (PI.f32)) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))))) (*.f32 alpha alpha)) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (+.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))))) (*.f32 alpha alpha))) (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))))) (*.f32 cosTheta cosTheta))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 #s(literal -1 binary32) (*.f32 (/.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))))) (pow.f32 cosTheta #s(literal 4 binary32)))) (+.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))))) (*.f32 alpha alpha))) (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))) (*.f32 (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))))) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/.f32 alpha (log.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) alpha))))))
#s(approx (* alpha (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha))))) (*.f32 alpha (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (+ (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/ 1 (log (pow (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ 1 (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2)) (pow.f32 (exp.f32 #s(literal 2 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (log (exp (* (* -1 (* (PI) (- 0 (log alpha)))) 2))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (* -1 (* (PI) (- 0 (log alpha)))) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))
#s(approx (* (PI) (- 0 (log alpha))) (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (- 0 (log alpha)) (*.f32 #s(literal -1 binary32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta))) alpha) (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) alpha))))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (pow.f32 cosTheta #s(literal 4 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) alpha)) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) alpha)))
#s(approx (/ (- alpha 1) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (/.f32 #s(literal 1 binary32) (pow.f32 cosTheta #s(literal 4 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta)))) (/.f32 #s(literal 1 binary32) (*.f32 alpha (pow.f32 cosTheta #s(literal 4 binary32))))) alpha)) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) alpha)) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) alpha)))
#s(approx (- alpha 1) (*.f32 #s(literal -1 binary32) (*.f32 alpha (-.f32 (/.f32 #s(literal 1 binary32) alpha) #s(literal 1 binary32)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32)))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (+.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))))) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32)))))) (*.f32 (*.f32 alpha alpha) alpha)) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32)))))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 alpha (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32)))))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (*.f32 alpha (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32)))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 alpha (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 6 binary32))))) (*.f32 (*.f32 alpha (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))) (pow.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 (*.f32 alpha (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 4 binary32))))) (*.f32 alpha (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (pow.f32 cosTheta #s(literal 6 binary32)))))))))) (*.f32 (*.f32 alpha alpha) alpha)) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 cosTheta cosTheta)))))))
#s(approx (log (pow (pow alpha (PI)) 2)) (log.f32 (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (pow (pow alpha (PI)) 2) (*.f32 (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (pow alpha (PI)) (pow.f32 (exp.f32 (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta))) alpha) (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) alpha))))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha (pow.f32 cosTheta #s(literal 4 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) alpha)) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) alpha)))
#s(approx (/ (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (/.f32 #s(literal 1 binary32) (pow.f32 cosTheta #s(literal 4 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 alpha (pow.f32 cosTheta #s(literal 4 binary32)))) (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) alpha) (/.f32 (/.f32 #s(literal 1 binary32) (pow.f32 cosTheta #s(literal 4 binary32))) alpha)) (/.f32 #s(literal 1 binary32) (*.f32 alpha (pow.f32 cosTheta #s(literal 4 binary32))))))) alpha)) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) alpha)) (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) alpha)))
#s(approx (/ (- (* (* alpha alpha) alpha) 1) (+ (* alpha alpha) (+ 1 (* alpha 1)))) (*.f32 #s(literal -1 binary32) (*.f32 alpha (-.f32 (/.f32 #s(literal 1 binary32) alpha) #s(literal 1 binary32)))))
#s(approx (- (* (* alpha alpha) alpha) 1) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) alpha)) #s(literal 1 binary32)))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))))
#s(approx (/ (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))) #s(literal 1/2 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 cosTheta cosTheta))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 #s(literal -2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha)) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 6 binary32))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha)) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 4 binary32)))))))))
#s(approx (* (PI) (log (* alpha alpha))) (*.f32 #s(literal -2 binary32) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))

eval895.0ms (1%)

Memory
10.2MiB live, 1 384.1MiB allocated; 144ms collecting garbage
Compiler

Compiled 1 099 711 to 13 392 computations (98.8% saved)

prune613.0ms (0.7%)

Memory
-35.5MiB live, 769.4MiB allocated; 122ms collecting garbage
Pruning

9 alts after pruning (4 fresh and 5 done)

PrunedKeptTotal
New2 84512 846
Fresh235
Picked055
Done000
Total2 84792 856
Accuracy
100.0%
Counts
2 856 → 9
Alt Table
Click to see full alt table
StatusAccuracyProgram
✓98.6%
(/.f32 (/.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
▶98.2%
(/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) #s(literal 1 binary32))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))))
▶98.2%
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta))))
✓98.2%
(/.f32 #s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
✓98.3%
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
▶98.1%
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (PI.f32)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
✓95.7%
(*.f32 #s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha)))))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
✓97.8%
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
▶97.2%
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
Compiler

Compiled 5 443 to 408 computations (92.5% saved)

series2.2s (2.3%)

Memory
46.7MiB live, 3 002.4MiB allocated; 514ms collecting garbage
Counts
174 → 1 251
Calls
Call 1
Inputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(literal 1/8 binary32)
(/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(pow.f32 alpha #s(literal 6 binary32))
alpha
#s(literal 6 binary32)
(*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(pow.f32 (PI.f32) #s(literal 3 binary32))
(PI.f32)
#s(literal 3 binary32)
(*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(pow.f32 (log.f32 alpha) #s(literal 3 binary32))
(log.f32 alpha)
(-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
(fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(literal 1/4 binary32)
(/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
#s(literal 1 binary32)
(*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))
(*.f32 (PI.f32) (PI.f32))
(pow.f32 (log.f32 alpha) #s(literal 2 binary32))
#s(literal 2 binary32)
(*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
(pow.f32 alpha #s(literal 4 binary32))
#s(literal 4 binary32)
(*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(literal -1/4 binary32)
(/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
(*.f32 alpha alpha)
(*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(*.f32 cosTheta cosTheta)
cosTheta
(-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))))))
(fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))
(/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
(fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(literal -1 binary32)
(-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))))
(*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))
#s(literal 3/2 binary32)
(/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))
(*.f32 (PI.f32) (log.f32 alpha))
(*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))
(-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))
#s(literal -1/2 binary32)
(*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))
(fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))))
#s(literal 1/2 binary32)
(/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha)))
(fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha)))
(fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
(*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
(fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
(*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))
(fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
(/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))
(fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
(*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))
(/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32))
(/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))
(fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
#s(literal 5/4 binary32)
(/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
(-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))
(*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
(/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))
(*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))
(*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
(/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))
(-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
(fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha)))
(/.f32 (*.f32 alpha alpha) (PI.f32))
(/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))
(*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha)))
(/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))
(*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
(/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))
(*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
(-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))
(*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))))
(+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
(fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha)))
(/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))
(fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
#s(literal 3/4 binary32)
(/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
(*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))))
(*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))
(*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
(*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
(/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
(*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
#s(literal 3/8 binary32)
(/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (PI.f32)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
(/.f32 (+.f32 alpha #s(literal 1 binary32)) (PI.f32))
(+.f32 alpha #s(literal 1 binary32))
(/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(-.f32 alpha #s(literal 1 binary32))
(*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(log.f32 (*.f32 alpha alpha))
(fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))
(-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta))))
(*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta)))
(*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta))
(*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta)
(*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta)
(/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))
(-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32))
(pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))
(+.f32 #s(literal 1 binary32) (*.f32 alpha alpha))
(/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) #s(literal 1 binary32))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))))
(-.f32 (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) #s(literal 1 binary32)))
(*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
(log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(pow.f32 (*.f32 alpha alpha) (PI.f32))
(*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) #s(literal 1 binary32))
(*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
Outputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (PI) (log (pow alpha 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2)) (* (PI) (log (pow alpha 2))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 3)) (* (PI) (log (pow alpha 2)))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 4)) (* (PI) (log (pow alpha 2))))) (* -1 (/ (pow (- (pow alpha 2) 1) 3) (* (PI) (log (pow alpha 2))))))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 1/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (* 1/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (* 1/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (* 1/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))))
#s(approx (* cosTheta cosTheta) #s(hole binary32 (pow cosTheta 2)))
#s(approx cosTheta #s(hole binary32 cosTheta))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (/ (* (+ 1 alpha) (- alpha 1)) (* (PI) (log (pow alpha 2))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* -1 (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1)))) (* (PI) (log (pow alpha 2))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (PI) (log (pow alpha 2)))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2)))) (* (PI) (log (pow alpha 2)))) (/ (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2)))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (PI) (log (pow alpha 2)))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 3)))) (* (PI) (log (pow alpha 2))))) (* -1 (/ (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2))) (* (PI) (log (pow alpha 2))))))) (/ (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2)))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- alpha 1) (log (pow alpha 2)))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (* (- alpha 1) (- (pow alpha 2) 1))) (log (pow alpha 2)))) (/ alpha (log (pow alpha 2)))) (/ 1 (log (pow alpha 2))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2))) (log (pow alpha 2))) (/ (* (- alpha 1) (- (pow alpha 2) 1)) (log (pow alpha 2))))) (/ alpha (log (pow alpha 2)))) (/ 1 (log (pow alpha 2))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (- alpha 1) (pow (- (pow alpha 2) 1) 3))) (log (pow alpha 2)))) (* -1 (/ (* (- alpha 1) (pow (- (pow alpha 2) 1) 2)) (log (pow alpha 2)))))) (/ (* (- alpha 1) (- (pow alpha 2) 1)) (log (pow alpha 2))))) (/ alpha (log (pow alpha 2)))) (/ 1 (log (pow alpha 2))))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (log (pow alpha 2))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (+ (log (pow alpha 2)) (* (pow cosTheta 2) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 1))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (PI) (log (pow alpha 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2)))) (/ (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 2) 1)) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2))))) (* -1 (/ (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2) (- (pow alpha 2) 1)) (* (PI) (log (pow alpha 2))))))) (/ (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 2) 1)) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (PI) (log (pow alpha 2)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* (PI) (log (pow alpha 2))) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 1))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (/ (* (pow cosTheta 2) (- (pow alpha 6) 1)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (/ (* cosTheta (- (pow alpha 6) 1)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (/ (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI)))) (pow (log (pow (pow alpha 2) (PI))) 2))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (+ (/ 1 (log (pow (pow alpha 2) (PI)))) (/ (* (pow alpha 2) (- (pow alpha 2) 1)) (log (pow (pow alpha 2) (PI))))) (+ (* 2 (/ (* (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))) (/ 1 (log (pow (pow alpha 2) (PI)))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (* 1/24 (/ (* (pow alpha 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))) (pow (log (pow (pow alpha 2) (PI))) 2))) (+ (* 1/24 (/ (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (pow (log (pow (pow alpha 2) (PI))) 2))) (+ (* 2 (* (- (+ (/ 1 (log (pow (pow alpha 2) (PI)))) (/ (* (pow alpha 2) (- (pow alpha 2) 1)) (log (pow (pow alpha 2) (PI))))) (+ (* 2 (/ (* (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI)))))) (- (pow alpha 2) 1))) (/ (* (+ (* 1/12 (* (log (pow (pow alpha 2) (PI))) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI))))) (pow (log (pow (pow alpha 2) (PI))) 4)))))) (+ (/ 1 (log (pow (pow alpha 2) (PI)))) (/ (* (pow alpha 2) (- (pow alpha 2) 1)) (log (pow (pow alpha 2) (PI)))))) (+ (* 2 (/ (* (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))) (/ 1 (log (pow (pow alpha 2) (PI)))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (+ (* 1/24 (/ (* (pow alpha 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))) (pow (log (pow (pow alpha 2) (PI))) 2))) (* (pow cosTheta 2) (- (* 1/720 (/ (* (pow alpha 2) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3)))))) (pow (log (pow (pow alpha 2) (PI))) 2))) (+ (* 1/720 (/ (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))) (pow (log (pow (pow alpha 2) (PI))) 2))) (+ (* 2 (* (- (* 1/24 (/ (* (pow alpha 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))) (pow (log (pow (pow alpha 2) (PI))) 2))) (+ (* 1/24 (/ (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (pow (log (pow (pow alpha 2) (PI))) 2))) (+ (* 2 (* (- (+ (/ 1 (log (pow (pow alpha 2) (PI)))) (/ (* (pow alpha 2) (- (pow alpha 2) 1)) (log (pow (pow alpha 2) (PI))))) (+ (* 2 (/ (* (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI)))))) (- (pow alpha 2) 1))) (/ (* (+ (* 1/12 (* (log (pow (pow alpha 2) (PI))) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI))))) (pow (log (pow (pow alpha 2) (PI))) 4))))) (- (pow alpha 2) 1))) (+ (/ (* (+ (* 1/360 (* (log (pow (pow alpha 2) (PI))) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))) (* 1/12 (* (log (pow (pow alpha 2) (PI))) (* (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (- (pow alpha 2) 1))))) (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI))))) (pow (log (pow (pow alpha 2) (PI))) 4)) (/ (* (+ (* 1/12 (* (log (pow (pow alpha 2) (PI))) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (- (+ (/ 1 (log (pow (pow alpha 2) (PI)))) (/ (* (pow alpha 2) (- (pow alpha 2) 1)) (log (pow (pow alpha 2) (PI))))) (+ (* 2 (/ (* (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))))) (pow (log (pow (pow alpha 2) (PI))) 2)))))))) (+ (* 1/24 (/ (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (pow (log (pow (pow alpha 2) (PI))) 2))) (+ (* 2 (* (- (+ (/ 1 (log (pow (pow alpha 2) (PI)))) (/ (* (pow alpha 2) (- (pow alpha 2) 1)) (log (pow (pow alpha 2) (PI))))) (+ (* 2 (/ (* (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI)))))) (- (pow alpha 2) 1))) (/ (* (+ (* 1/12 (* (log (pow (pow alpha 2) (PI))) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI))))) (pow (log (pow (pow alpha 2) (PI))) 4)))))) (+ (/ 1 (log (pow (pow alpha 2) (PI)))) (/ (* (pow alpha 2) (- (pow alpha 2) 1)) (log (pow (pow alpha 2) (PI)))))) (+ (* 2 (/ (* (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))) (/ 1 (log (pow (pow alpha 2) (PI)))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (- (+ (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (* (pow cosTheta 2) (- (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))) (log (pow (pow alpha 2) (PI))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (- (+ (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (* (pow cosTheta 2) (- (+ (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))) (* (pow cosTheta 2) (- (* 1/24 (* (pow alpha 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* 1/24 (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))))) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))) (log (pow (pow alpha 2) (PI))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (- (+ (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (* (pow cosTheta 2) (- (+ (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))) (* (pow cosTheta 2) (- (+ (* 1/24 (* (pow alpha 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (pow cosTheta 2) (- (* 1/720 (* (pow alpha 2) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))) (* 1/720 (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))))) (* 1/24 (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))))) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))) (log (pow (pow alpha 2) (PI))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* (pow alpha 2) (log (pow (pow alpha 2) (PI))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (* (pow alpha 2) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (* (pow cosTheta 2) (+ (* 1/24 (* (pow alpha 2) (* (pow cosTheta 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))))) (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (* (pow cosTheta 2) (+ (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))) (* (pow cosTheta 2) (+ (* 1/720 (* (pow alpha 2) (* (pow cosTheta 2) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3)))))))) (* 1/24 (* (pow alpha 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (log (pow (pow alpha 2) (PI)))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (+ (* 1/24 (* (pow cosTheta 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (+ (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)) (* (pow cosTheta 2) (+ (* 1/720 (* (pow cosTheta 2) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))) (* 1/24 (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (pow (pow alpha 2) (PI))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (+ (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (* (- (pow alpha 2) 1) (pow (pow alpha 2) (PI))))) (pow (pow alpha 2) (PI)))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* 1/2 (* (pow cosTheta 2) (* (pow (log (pow (pow alpha 2) (PI))) 2) (* (pow (- (pow alpha 2) 1) 2) (pow (pow alpha 2) (PI)))))) (* (log (pow (pow alpha 2) (PI))) (* (- (pow alpha 2) 1) (pow (pow alpha 2) (PI)))))) (pow (pow alpha 2) (PI)))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* (log (pow (pow alpha 2) (PI))) (* (- (pow alpha 2) 1) (pow (pow alpha 2) (PI)))) (* (pow cosTheta 2) (+ (* 1/6 (* (pow cosTheta 2) (* (pow (log (pow (pow alpha 2) (PI))) 3) (* (pow (- (pow alpha 2) 1) 3) (pow (pow alpha 2) (PI)))))) (* 1/2 (* (pow (log (pow (pow alpha 2) (PI))) 2) (* (pow (- (pow alpha 2) 1) 2) (pow (pow alpha 2) (PI))))))))) (pow (pow alpha 2) (PI)))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (log (pow (pow alpha 2) (PI)))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (+ (* 1/24 (* (pow cosTheta 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (+ (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)) (* (pow cosTheta 2) (+ (* 1/720 (* (pow cosTheta 2) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))) (* 1/24 (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (pow (log (pow (pow alpha 2) (PI))) 2)))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* 2 (* (pow cosTheta 2) (* (pow (log (pow (pow alpha 2) (PI))) 2) (- (pow alpha 2) 1)))) (pow (log (pow (pow alpha 2) (PI))) 2))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* 2 (* (pow (log (pow (pow alpha 2) (PI))) 2) (- (pow alpha 2) 1))) (* (pow cosTheta 2) (+ (* 1/12 (* (log (pow (pow alpha 2) (PI))) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (pow (log (pow (pow alpha 2) (PI))) 2))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* 2 (* (pow (log (pow (pow alpha 2) (PI))) 2) (- (pow alpha 2) 1))) (* (pow cosTheta 2) (+ (* 1/12 (* (log (pow (pow alpha 2) (PI))) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (+ (* (pow cosTheta 2) (+ (* 1/360 (* (log (pow (pow alpha 2) (PI))) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))) (* 1/12 (* (log (pow (pow alpha 2) (PI))) (* (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (- (pow alpha 2) 1)))))) (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))))) (pow (log (pow (pow alpha 2) (PI))) 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3))))))) (pow cosTheta 2))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (- (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ 3/2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* 2 (/ (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))) (pow cosTheta 2)))) (pow cosTheta 2))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (- (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 3 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (/ 3/2 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))) (pow cosTheta 2))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))) (pow cosTheta 4))) (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (- (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))))))) (pow cosTheta 4)))))) (pow cosTheta 2))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (- (+ (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (+ (* (pow alpha 6) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 3)) (* 5/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (pow cosTheta 6))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 3 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (/ 3/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))) (pow cosTheta 2))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))) (pow cosTheta 4))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (+ (* 2 (* (pow alpha 4) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))))) (pow cosTheta 6))) (+ (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (- (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))))))) (pow cosTheta 4))) (+ (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (- (* 3 (/ 1 (* (PI) (log alpha)))) (+ (* 2 (* (PI) (* (log alpha) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))))) (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (- (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))))))))))))) (pow cosTheta 6))) (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))))) (pow cosTheta 6))))))))) (pow cosTheta 2))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 3/8 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* (pow cosTheta 4) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (+ (* 1/8 (/ (pow alpha 6) (* (pow cosTheta 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 1/8 (* (pow cosTheta 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 3/8 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* (pow cosTheta 4) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 3/8 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* (pow cosTheta 4) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (+ (* 1/8 (/ (pow alpha 6) (* (pow cosTheta 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 3/8 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* (pow cosTheta 4) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 3/8 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* (pow cosTheta 4) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 4) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 4) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 4) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 3/8 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* (pow cosTheta 4) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow cosTheta 4) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow cosTheta 4) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow cosTheta 4) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (/ (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (/ (- (+ (/ (* (+ 1 alpha) (- alpha 1)) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 4)))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2))))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- alpha 1) (* (pow cosTheta 2) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))) (/ alpha (* (log (pow alpha 2)) (- (pow alpha 2) 1)))) (+ (/ 1 (* (log (pow alpha 2)) (- (pow alpha 2) 1))) (/ alpha (* (pow cosTheta 2) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))) (+ (/ alpha (* (log (pow alpha 2)) (- (pow alpha 2) 1))) (/ alpha (* (pow cosTheta 4) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))))) (+ (/ 1 (* (log (pow alpha 2)) (- (pow alpha 2) 1))) (+ (/ 1 (* (pow cosTheta 4) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))) (/ alpha (* (pow cosTheta 2) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2))))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))) (+ (/ 1 (* (pow cosTheta 6) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 4)))) (+ (/ alpha (* (log (pow alpha 2)) (- (pow alpha 2) 1))) (/ alpha (* (pow cosTheta 4) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3))))))) (+ (/ 1 (* (log (pow alpha 2)) (- (pow alpha 2) 1))) (+ (/ 1 (* (pow cosTheta 4) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))) (+ (/ alpha (* (pow cosTheta 2) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))) (/ alpha (* (pow cosTheta 6) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 4)))))))) (pow cosTheta 2))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* (pow cosTheta 2) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* (pow cosTheta 2) (+ (* (log (pow alpha 2)) (- (pow alpha 2) 1)) (/ (log (pow alpha 2)) (pow cosTheta 2))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow cosTheta 2) (- (pow alpha 2) 1))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ 1 (pow cosTheta 2)) (pow alpha 2)) 1))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))) (/ (pow alpha 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))) (+ (/ (pow alpha 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (+ (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3))))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2)))))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))) (+ (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 4))))) (+ (/ (pow alpha 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3)))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (+ (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3))))) (+ (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))) (/ (pow alpha 2) (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 4))))))))) (pow cosTheta 2))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (+ (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))) (/ (* (PI) (log (pow alpha 2))) (pow cosTheta 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ 1 (pow cosTheta 2)) (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (/ (- (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2)))) (* (log (pow (pow alpha 2) (PI))) (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2)))) (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2)) 2)))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (- (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2)))) (* (log (pow (pow alpha 2) (PI))) (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (* (log (pow (pow alpha 2) (PI))) (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2)))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (exp (* (log (pow (pow alpha 2) (PI))) (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (* (log (pow (pow alpha 2) (PI))) (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2)))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2)) 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))) (* 2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)))))))) (* -1 (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3))))) (+ (* -2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (* (+ (* -2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))) (* 2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)))))) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))) (+ (* 4 (* (pow cosTheta 2) (* (PI) (* (log alpha) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2))))) (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (* (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))))))) (+ (* -2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))) (* 2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)))))))) (* -1 (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* (pow alpha 2) (+ (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* (pow alpha 2) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* (pow alpha 2) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))))))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* 4 (/ (pow alpha 6) (* (PI) (log alpha))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (+ (* -4 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 4 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* 4 (/ (pow alpha 4) (* (PI) (log alpha)))) (* 4 (/ 1 (* (PI) (log alpha)))))) (* 4 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* (pow alpha 4) (+ (* -4 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 4 (/ 1 (* (PI) (log alpha)))))) (* 4 (/ 1 (* (PI) (log alpha)))))) (* 4 (/ 1 (* (PI) (log alpha))))))))
#s(approx (pow alpha 6) #s(hole binary32 (pow alpha 6)))
#s(approx alpha #s(hole binary32 alpha))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* 1/4 (* (PI) (log alpha)))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* 1/4 (* (PI) (log alpha))) (* 1/4 (* (pow alpha 2) (* (PI) (log alpha)))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* 1/4 (* (PI) (log alpha))) (* (pow alpha 2) (+ (* 1/4 (* (PI) (log alpha))) (* 1/4 (* (pow alpha 2) (* (PI) (log alpha)))))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/4 (/ (log alpha) (pow (PI) 2)))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* 1/4 (/ (log alpha) (pow (PI) 2))) (* 1/4 (/ (* (pow alpha 2) (log alpha)) (pow (PI) 2))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* 1/4 (/ (log alpha) (pow (PI) 2))) (* (pow alpha 2) (+ (* 1/4 (/ (log alpha) (pow (PI) 2))) (* 1/4 (/ (* (pow alpha 2) (log alpha)) (pow (PI) 2))))))))
#s(approx (pow (log alpha) 3) #s(hole binary32 (pow (log alpha) 3)))
#s(approx (log alpha) #s(hole binary32 (log alpha)))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (/ 1/4 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (+ (* 1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* 1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (/ 1/4 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (+ (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (* (* (PI) (PI)) (pow (log alpha) 2)) #s(hole binary32 (* (pow (PI) 2) (pow (log alpha) 2))))
#s(approx (pow (log alpha) 2) #s(hole binary32 (pow (log alpha) 2)))
#s(approx (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (pow alpha 4) #s(hole binary32 (pow alpha 4)))
#s(approx (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (* alpha alpha) #s(hole binary32 (pow alpha 2)))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (+ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* (pow alpha 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* (pow alpha 2) (+ (* (pow alpha 2) (- (* (pow cosTheta 2) (- (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha))))))) (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (* (pow cosTheta 2) (- (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha))))))) (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))))) (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 3 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))))) (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))))) (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 3/2 (/ 1 (* (PI) (log alpha)))) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (- (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha)))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* -3 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha)))) (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 21/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (/ -1/2 (* (PI) (log alpha)))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* 2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* -3 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 28 (/ (pow alpha 6) (* (PI) (log alpha))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* -70 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 28 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* 54 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 70 (/ 1 (* (PI) (log alpha)))))) (* 28 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* 31/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 54 (/ 1 (* (PI) (log alpha)))))) (* 70 (/ 1 (* (PI) (log alpha)))))) (* 28 (/ 1 (* (PI) (log alpha))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* 7 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 6) (+ (* -21/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 7 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* 3 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 21/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 7 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 21/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 7 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (/ 7 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (+ (* -21/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 7 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 21/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 7 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 21/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 7 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ 2 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (+ (* -3 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (/ 2 (* (PI) (log alpha)))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (+ (* -3 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) #s(hole binary32 (* 3 (/ (pow alpha 2) (* (PI) (log alpha))))))
#s(approx (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha))))))
#s(approx (/ (* alpha alpha) (* (PI) (log alpha))) #s(hole binary32 (/ (pow alpha 2) (* (PI) (log alpha)))))
#s(approx (* (PI) (log alpha)) #s(hole binary32 (* (PI) (log alpha))))
#s(approx (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha))))))
#s(approx (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))
#s(approx (* 2 (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (/ 2 (* (PI) (log alpha)))))
#s(approx (/ 1 (* (PI) (log alpha))) #s(hole binary32 (/ 1 (* (PI) (log alpha)))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (/ 13/2 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (+ (* -39/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 13/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 39/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 13/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 39/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 13/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (/ 5 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (+ (* -15/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 5 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 15/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 5 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (/ 5 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* -15/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 15/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 5 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* 3 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (/ 5 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (+ (* -9/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 9/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 5 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (/ 3/2 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (+ (* -9/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 9/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (/ 3/2 (* (PI) (log alpha)))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (+ (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* 3/2 (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (/ 3/2 (* (PI) (log alpha)))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (/ 1 (* (PI) (log alpha)))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))
#s(approx (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (/ 2 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (/ 4 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (+ (* -6 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 9/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 6 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 9/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 6 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (/ 5/2 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (+ (* -5/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (/ 5/2 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (+ (* -1 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (+ (* -1 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (/ 3/2 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (+ (* -9/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 9/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 3/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) #s(hole binary32 (/ 3/2 (* (pow (PI) 2) (log alpha)))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) #s(hole binary32 (+ (* -3/2 (/ (pow alpha 2) (* (pow (PI) 2) (log alpha)))) (* 3/2 (/ 1 (* (pow (PI) 2) (log alpha)))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) #s(hole binary32 (/ 1 (* (PI) (pow (log alpha) 2)))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) #s(hole binary32 (+ (* -1/2 (/ (pow alpha 2) (* (PI) (pow (log alpha) 2)))) (/ 1 (* (PI) (pow (log alpha) 2))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* -2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* 28 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3 (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ 4 (* (PI) (log alpha)))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* -4 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 4 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 4 (/ (pow alpha 4) (* (PI) (log alpha)))) (* 4 (/ 1 (* (PI) (log alpha)))))) (* 4 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 4) (+ (* -4 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 4 (/ 1 (* (PI) (log alpha)))))) (* 4 (/ 1 (* (PI) (log alpha)))))) (* 4 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (/ -9/2 (* (PI) (log alpha)))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* 3 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 9/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* 3 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3 (/ 1 (* (PI) (log alpha)))))) (* 9/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 23 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3 (/ 1 (* (PI) (log alpha)))))) (* 3 (/ 1 (* (PI) (log alpha)))))) (* 9/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (/ -2 (* (PI) (log alpha)))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* 3 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (+ (* 18 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* 2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (/ -1/8 (* (pow (PI) 5) (pow (log alpha) 5)))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (- (* -5/16 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 1/8 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* -5/16 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 5/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 1/8 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* 17/16 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 5/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 5/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 1/8 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) #s(hole binary32 (/ -1/8 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) #s(hole binary32 (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) #s(hole binary32 (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))) #s(hole binary32 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (* (pow (PI) 3) (pow (log alpha) 3)) #s(hole binary32 (* (pow (PI) 3) (pow (log alpha) 3))))
#s(approx (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) #s(hole binary32 (/ 1/8 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))) #s(hole binary32 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* 5/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* 5/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* -15/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (+ (* 5 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (+ (* (pow alpha 4) (+ (* -15/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (+ (* (pow alpha 4) (+ (* (pow alpha 2) (- (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 15/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 5 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* -5/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 2) (- (* 5/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* 5 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 2) (+ (* -5 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* 2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* (pow alpha 2) (+ (* -3 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (/ (* alpha alpha) (PI)) #s(hole binary32 (/ (pow alpha 2) (PI))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (/ 2 (* (PI) (pow (log alpha) 2)))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (+ (* -3 (/ (pow alpha 2) (* (PI) (pow (log alpha) 2)))) (* 2 (/ 1 (* (PI) (pow (log alpha) 2)))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* -3 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 2) (- (* 2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* 3 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* (pow alpha 2) (+ (* -3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (/ 3/2 (* (PI) (pow (log alpha) 2)))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (+ (* -3/2 (/ (pow alpha 2) (* (PI) (pow (log alpha) 2)))) (* 3/2 (/ 1 (* (PI) (pow (log alpha) 2)))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 2) (- (* 1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (/ (pow alpha 2) (* (PI) (log alpha)))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (/ 1/16 (* (pow (PI) 4) (pow (log alpha) 4)))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* 1/8 (/ (pow alpha 2) (* (pow (PI) 4) (pow (log alpha) 4)))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (log alpha) 4)))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* 3/16 (/ (pow alpha 2) (* (pow (PI) 4) (pow (log alpha) 4)))) (* 1/8 (/ 1 (* (pow (PI) 4) (pow (log alpha) 4)))))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (log alpha) 4)))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 1/8 (/ (pow alpha 2) (* (pow (PI) 4) (pow (log alpha) 4)))) (* 3/16 (/ 1 (* (pow (PI) 4) (pow (log alpha) 4)))))) (* 1/8 (/ 1 (* (pow (PI) 4) (pow (log alpha) 4)))))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (log alpha) 4)))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (/ -5/2 (* (PI) (log alpha)))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (- (* 4 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 5/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* 5 (/ (pow alpha 4) (* (PI) (log alpha)))) (* 4 (/ 1 (* (PI) (log alpha)))))) (* 5/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* (pow alpha 4) (+ (* -26 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 5 (/ 1 (* (PI) (log alpha)))))) (* 4 (/ 1 (* (PI) (log alpha)))))) (* 5/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (/ -5/8 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (- (* 3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 5/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* 3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 5/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 9/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 5/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (/ 1/2 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* 3/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* 3/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (/ 1/2 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (+ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (/ (pow alpha 4) (* (PI) (log alpha)))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* -3/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 2) (- (* 1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (/ -1/2 (* (PI) (log alpha)))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 21/2 (/ (pow alpha 6) (* (PI) (log alpha))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* -21 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 21/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* 12 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 21 (/ 1 (* (PI) (log alpha)))))) (* 21/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* 9 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 12 (/ 1 (* (PI) (log alpha)))))) (* 21 (/ 1 (* (PI) (log alpha)))))) (* 21/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* 21/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 6) (+ (* -21/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 21/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* 3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 21/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 21/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (/ 21/8 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (+ (* -21/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 21/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 21/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 21/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (/ 3/8 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (+ (* -3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ 3/2 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (+ (* -3/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (/ 9/4 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (+ (* -9/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 9/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 9/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 9/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (/ 5/2 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (+ (* -5/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 5/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 1/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 5/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 5/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (+ (* -1 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 1/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* 21/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (/ -5/2 (* (PI) (log alpha)))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 5/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 5/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 3/2 (/ 1 (* (PI) (log alpha)))) (* (pow alpha 2) (- (* 21 (/ 1 (* (PI) (log alpha)))) (* 27/2 (/ 1 (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 5/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (/ -5/128 (* (pow (PI) 7) (pow (log alpha) 7)))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (- (* -3/32 (/ (pow alpha 2) (* (pow (PI) 7) (pow (log alpha) 7)))) (* 5/128 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* -9/64 (/ (pow alpha 2) (* (pow (PI) 7) (pow (log alpha) 7)))) (* 3/32 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))) (* 5/128 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* 11/128 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))) (* 1/32 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))) (* 9/64 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))) (* 3/32 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))) (* 5/128 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (/ -3/32 (* (pow (PI) 5) (pow (log alpha) 5)))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* -3/16 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 3/32 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* -3/16 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 3/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 3/32 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* 13/32 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 3/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 3/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 3/32 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (/ 3/4 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (+ (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* -5/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (/ 3/4 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (+ (* 5/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (+ (* (pow alpha 4) (+ (* -5/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (+ (* (pow alpha 4) (+ (* (pow alpha 2) (- (* 1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* 5/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* (pow alpha 4) (+ (* -5/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow alpha 2) (- (* 1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 2) (- (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (/ -1/64 (* (pow (PI) 7) (pow (log alpha) 7)))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (- (* -3/128 (/ (pow alpha 2) (* (pow (PI) 7) (pow (log alpha) 7)))) (* 1/64 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* -3/128 (/ (pow alpha 2) (* (pow (PI) 7) (pow (log alpha) 7)))) (* 3/128 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))) (* 1/64 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* 5/64 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))) (* 1/32 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))) (* 3/128 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))) (* 3/128 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))) (* 1/64 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (/ -1/4 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* 1/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* 1/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) (* 5/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (/ -1/2 (* (PI) (log alpha)))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 3 (/ (pow alpha 6) (* (PI) (log alpha))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* -9/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 9/2 (/ 1 (* (PI) (log alpha)))))) (* 3 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* 3 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 9/2 (/ 1 (* (PI) (log alpha)))))) (* 3 (/ 1 (* (PI) (log alpha))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 3/4 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* -3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (/ 3/4 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (+ (* -3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (+ (* -1/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (/ 1/2 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (+ (* -1/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* 3 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (/ -1 (* (PI) (log alpha)))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ -1/16 (* (pow (PI) 5) (pow (log alpha) 5)))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (- (* -3/32 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 1/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* -3/32 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 3/32 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 1/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* 1/8 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 3/32 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 3/32 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 1/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (/ 1/64 (* (pow (PI) 6) (pow (log alpha) 6)))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* 3/64 (/ (pow alpha 2) (* (pow (PI) 6) (pow (log alpha) 6)))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (log alpha) 6)))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* 3/32 (/ (pow alpha 2) (* (pow (PI) 6) (pow (log alpha) 6)))) (* 3/64 (/ 1 (* (pow (PI) 6) (pow (log alpha) 6)))))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (log alpha) 6)))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 3/32 (/ 1 (* (pow (PI) 6) (pow (log alpha) 6)))) (* 7/64 (/ (pow alpha 2) (* (pow (PI) 6) (pow (log alpha) 6)))))) (* 3/64 (/ 1 (* (pow (PI) 6) (pow (log alpha) 6)))))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (log alpha) 6)))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (/ -3/8 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* 3/8 (/ (pow alpha 4) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* (pow alpha 4) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) (* 2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* (pow alpha 4) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) (* (pow alpha 2) (+ (* -27/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 1/2 (/ (pow alpha 4) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (+ alpha 1) (PI)) #s(hole binary32 (/ 1 (PI))))
#s(approx (/ (+ alpha 1) (PI)) #s(hole binary32 (+ (/ 1 (PI)) (/ alpha (PI)))))
#s(approx (+ alpha 1) #s(hole binary32 1))
#s(approx (+ alpha 1) #s(hole binary32 (+ 1 alpha)))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ -1/2 (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* 1/2 (/ alpha (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 1/2 (/ 1 (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* alpha (+ (* 1/2 (/ (* alpha (pow cosTheta 2)) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* 1/2 (/ 1 (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* 1/2 (/ 1 (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* alpha (+ (* alpha (- (* -1/2 (/ (* alpha (pow cosTheta 2)) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* -1/2 (/ (pow cosTheta 2) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (* 1/2 (/ 1 (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* 1/2 (/ 1 (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (- alpha 1) #s(hole binary32 -1))
#s(approx (- alpha 1) #s(hole binary32 (- alpha 1)))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* 2 (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (+ (* 2 (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (log alpha)))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* 2 (log alpha))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2))))))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 -1))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (- (pow alpha 2) 1)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (* (pow alpha 2) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1 (/ (* (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))) (+ (* -1 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2)))))) (+ 1 (* -1 (pow cosTheta 2))))) (* -1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* -2 (* (pow alpha 2) (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* -2 (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))))) (* 2 (* (pow alpha 2) (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))))))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* 2 (* (PI) (log alpha)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* -1 (pow cosTheta 2))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2)))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2)))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* -1 cosTheta)))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) cosTheta))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ cosTheta (* -1 cosTheta)))) (* -1 cosTheta))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ cosTheta (* -1 cosTheta))) (+ cosTheta (* -1 cosTheta)))) (* -1 cosTheta))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 -1))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (- (pow alpha 2) 1)))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 -1))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (- (pow alpha 6) 1)))
#s(approx (pow (* alpha alpha) 3) #s(hole binary32 (pow alpha 6)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 1))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (+ 1 (pow alpha 2))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (+ 1 (* (pow alpha 2) (+ 1 (pow alpha 2))))))
#s(approx (+ 1 (* alpha alpha)) #s(hole binary32 1))
#s(approx (+ 1 (* alpha alpha)) #s(hole binary32 (+ 1 (pow alpha 2))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/4 (/ (- (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* -1 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/4 (/ (- (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (- (* 1/4 (/ (- (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (+ (* -1/8 (/ (+ (* 1/6 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 2 (/ (* (pow cosTheta 2) (- (* 1/4 (/ (- (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* -1 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))))) (* -1 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/4 (/ (- (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (- (+ (* 1/4 (/ (- (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (- (* 1/4 (/ (- (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/720 (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (+ (* -1/8 (/ (+ (* 1/180 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))))) (* 1/6 (* (pow cosTheta 2) (* (PI) (* (log alpha) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (+ (* 1/4 (/ (* (+ (* 1/6 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (- (* 1/4 (/ (- (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* -1 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 2 (/ (* (pow cosTheta 2) (- (* 1/4 (/ (- (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (+ (* -1/8 (/ (+ (* 1/6 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 2 (/ (* (pow cosTheta 2) (- (* 1/4 (/ (- (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* -1 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2)))))))) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ (* -1/8 (/ (+ (* 1/6 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 2 (/ (* (pow cosTheta 2) (- (* 1/4 (/ (- (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* -1 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))))) (* -1 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (* -2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (- (* (pow alpha 2) (- (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (- (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (- (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (- (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/720 (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* 2 (* (pow alpha 2) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* (pow alpha 2) (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* (pow alpha 2) (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 1/24 (* (pow alpha 2) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* (pow alpha 2) (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 1/720 (* (pow alpha 2) (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 1/24 (* (pow alpha 2) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 1/720 (* (pow alpha 2) (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (+ (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (* (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (log alpha)))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (+ (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (+ (* 2 (* (pow alpha 2) (* (pow cosTheta 4) (* (pow (PI) 2) (* (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (pow (log alpha) 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (* (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (log alpha))))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (+ (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (* (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (log alpha))))) (* (pow alpha 2) (+ (* 4/3 (* (pow alpha 2) (* (pow cosTheta 6) (* (pow (PI) 3) (* (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (pow (log alpha) 3)))))) (* 2 (* (pow cosTheta 4) (* (pow (PI) 2) (* (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (pow (log alpha) 2))))))))))))
#s(approx (pow (* alpha alpha) (PI)) #s(hole binary32 (exp (* 2 (* (PI) (log alpha))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 1/24 (* (pow alpha 2) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 1/720 (* (pow alpha 2) (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* 8 (* (pow alpha 2) (* (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log alpha) 2) (+ 1 (* -1 (pow cosTheta 2)))))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow alpha 2) (+ (* 8 (* (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log alpha) 2) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (+ (* 1/6 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow alpha 2) (+ (* 8 (* (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log alpha) 2) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (+ (* 1/6 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 2) (+ (* 1/180 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))))) (* 1/6 (* (pow cosTheta 2) (* (PI) (* (log alpha) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))))) (* -2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) (pow alpha 2)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2)))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 4) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)))))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (* -2 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* -2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) (pow alpha 2))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2)))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 4) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))))))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (* -2 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (* -2 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))) (pow cosTheta 2))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))))) (* (pow alpha 6) (pow cosTheta 2)))) (+ (* -2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) (pow alpha 2))) (+ (* 1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* 1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow alpha 6) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))))) (+ (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (* (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (* -2 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (- (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (* (pow alpha 6) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))) (/ (* (pow cosTheta 2) (- (+ (* 7/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 9/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2))) (/ 1/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (/ (* (pow cosTheta 2) (- (+ (* 3 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 9 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 17/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 5/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 4)) (/ (* (pow cosTheta 2) (- (+ (* 7/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 9/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2))))) (/ 1/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 4) (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))) (/ (* (pow cosTheta 2) (- (+ (* 7/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 9/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2))) (/ 1/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (/ (* (pow cosTheta 2) (- (+ (* 3 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 9 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 17/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 5/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 4)) (/ (* (pow cosTheta 2) (- (+ (* 7/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 9/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2))))) (/ 1/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (/ (* (pow cosTheta 2) (- (+ (* 3 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 9 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 17/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 5/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 4)) (/ (* (pow cosTheta 2) (- (+ (* 7/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 9/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2))))) (+ (/ 1/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (* 1/2 (/ 1 (* (pow alpha 8) (* (PI) (log (/ 1 alpha)))))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* -4 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 2) (- (* 4 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 4 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 2) (- (/ 4 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (+ (* 4 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 4 (* (pow alpha 6) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 2) (- (+ (* 4 (/ 1 (* (pow alpha 8) (* (PI) (log (/ 1 alpha)))))) (/ 4 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (* 4 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 4 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -1/4 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (+ (* -1/4 (* (PI) (log (/ 1 alpha)))) (* -1/4 (/ (* (PI) (log (/ 1 alpha))) (pow alpha 2)))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (+ (* -1/4 (* (PI) (log (/ 1 alpha)))) (+ (* -1/4 (/ (* (PI) (log (/ 1 alpha))) (pow alpha 2))) (* -1/4 (/ (* (PI) (log (/ 1 alpha))) (pow alpha 4))))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* -1/4 (/ (* (pow alpha 4) (log (/ 1 alpha))) (pow (PI) 2)))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (+ (* -1/4 (/ (log (/ 1 alpha)) (* (pow alpha 2) (pow (PI) 2)))) (* -1/4 (/ (log (/ 1 alpha)) (pow (PI) 2)))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (+ (* -1/4 (/ (log (/ 1 alpha)) (* (pow alpha 2) (pow (PI) 2)))) (+ (* -1/4 (/ (log (/ 1 alpha)) (* (pow alpha 4) (pow (PI) 2)))) (* -1/4 (/ (log (/ 1 alpha)) (pow (PI) 2))))))))
#s(approx (pow (log alpha) 3) #s(hole binary32 (* -1 (pow (log (/ 1 alpha)) 3))))
#s(approx (log alpha) #s(hole binary32 (* -1 (log (/ 1 alpha)))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (+ (* 1/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (+ (/ 1/4 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (+ (/ 1/4 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (+ (* 1/4 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))
#s(approx (* (* (PI) (PI)) (pow (log alpha) 2)) #s(hole binary32 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))
#s(approx (pow (log alpha) 2) #s(hole binary32 (pow (log (/ 1 alpha)) 2)))
#s(approx (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))
#s(approx (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 4) (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))) (/ (* (pow cosTheta 2) (- (+ (* 7/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 9/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))) (+ (/ (* (pow cosTheta 2) (- (+ (* 3 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 9 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 17/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 5/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 4)) (/ (* (pow cosTheta 2) (- (+ (* 7/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 9/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2)))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (+ (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (+ (/ 7/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (/ (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2))))) (+ (/ 1 (* (PI) (log (/ 1 alpha)))) (/ 9/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (+ (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (/ 7/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (+ (/ (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2)) (/ (* (pow cosTheta 2) (- (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 9 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 17/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 4))))))) (+ (/ 1 (* (PI) (log (/ 1 alpha)))) (/ 9/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (+ (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (/ (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2)))) (/ 9/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (+ (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (+ (* 3 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (/ (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2)) (/ (* (pow cosTheta 2) (- (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 9 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 17/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 4)))))) (/ 9/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (+ (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (+ (* 3 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (* 3/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (+ (/ (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2)) (/ (* (pow cosTheta 2) (- (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 9 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 17/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 4))))))) (/ 9/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (+ (* 12 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 39/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))) (+ (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 21 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (* 1/2 (/ (pow cosTheta 2) (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (+ (* 12 (/ 1 (* (PI) (log (/ 1 alpha))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (/ 39/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))) (+ (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 21 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -3/2 (/ (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (/ 12 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* -2 (/ (pow cosTheta 2) (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (* 3 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (/ 12 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))) (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 21 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* -2 (/ (pow cosTheta 2) (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (* 1/2 (/ (pow cosTheta 2) (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (+ (* 3 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (/ 9 (* (pow alpha 6) (* (PI) (log (/ 1 alpha))))) (/ 12 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))) (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 21 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* 3 (/ (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 3 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1/2 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))) (* 3 (/ 1 (* (PI) (log (/ 1 alpha)))))) (/ 2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/2 (/ (pow alpha 8) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 25/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 54 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (/ 25/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 54 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 139/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (/ 25/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* 1/8 (/ (pow alpha 12) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 12) (- (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 21/2 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 21/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (+ (* 7 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (* (pow alpha 6) (- (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 21/2 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 21/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (+ (* 7 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* 3 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* (pow alpha 2) (- (* 3 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* 3 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 2) (- (* 3 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) #s(hole binary32 (* -3 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (* alpha alpha) (* (PI) (log alpha))) #s(hole binary32 (* -1 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (* (PI) (log alpha)) #s(hole binary32 (* -1 (* (PI) (log (/ 1 alpha))))))
#s(approx (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) #s(hole binary32 (* 1/2 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (* 2 (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (/ -2 (* (PI) (log (/ 1 alpha))))))
#s(approx (/ 1 (* (PI) (log alpha))) #s(hole binary32 (/ -1 (* (PI) (log (/ 1 alpha))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (* (pow alpha 6) (- (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 39/4 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 39/4 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (+ (* 13/2 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (* -3/2 (/ (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 15/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 3/2 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (/ 15/2 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (+ (* 3/2 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 5 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 3/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 15/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 5 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* 3 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* 3/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 9/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 5 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 9/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* 3/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 3/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 2) (- (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (* 3/2 (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (/ -3/2 (* (PI) (log (/ 1 alpha))))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (* 1/2 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (/ 2 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 6 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 6 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (+ (* 4 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (* -3/4 (/ (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 3/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 3/2 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (log (/ 1 alpha)))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) #s(hole binary32 (* (pow alpha 2) (- (* 3/2 (/ 1 (* (pow (PI) 2) (log (/ 1 alpha))))) (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (log (/ 1 alpha))))))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (PI) (pow (log (/ 1 alpha)) 2))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) #s(hole binary32 (* (pow alpha 2) (- (/ 1 (* (pow alpha 2) (* (PI) (pow (log (/ 1 alpha)) 2)))) (* 1/2 (/ 1 (* (PI) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* 1/2 (/ (pow alpha 8) (* (PI) (log (/ 1 alpha)))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 25/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 51 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (/ 25/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 51 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 135/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (/ 25/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ -4 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (* 4 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 4 (/ 1 (* (PI) (log (/ 1 alpha)))))) (pow alpha 4))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (/ 4 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (+ (* 4 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 4 (* (pow alpha 6) (* (PI) (log (/ 1 alpha))))))) (pow alpha 4))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (+ (* 4 (/ 1 (* (pow alpha 8) (* (PI) (log (/ 1 alpha)))))) (/ 4 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (* 4 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 4 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))) (pow alpha 4))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* 1/2 (/ (pow alpha 8) (* (PI) (log (/ 1 alpha)))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 25/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 51 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (/ 25/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 51 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 135/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (/ 25/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -3 (/ (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (* 21 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 3 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (/ 21 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (+ (* 3 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 38 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 17 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (/ 21 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (* 3 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 38 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* -3/16 (/ (pow alpha 14) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 14) (- (* 15/16 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))) (* 3/16 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 14) (- (/ 15/16 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (+ (/ 5/16 (* (pow alpha 4) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (* 3/16 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 14) (- (+ (* -1 (/ (+ (* 5/16 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (* 1/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))))) (pow alpha 4))) (/ 15/16 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))) (* 3/16 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) #s(hole binary32 (* -1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) #s(hole binary32 (* (pow alpha 6) (- (* 1/8 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) #s(hole binary32 (* -1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))) #s(hole binary32 (* -1 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* (pow (PI) 3) (pow (log alpha) 3)) #s(hole binary32 (* -1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))
#s(approx (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) #s(hole binary32 (/ -1/8 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))
#s(approx (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))) #s(hole binary32 (/ -1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* 3/2 (/ (pow alpha 8) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 8) (- (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 15/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 5/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (+ (* 5/2 (/ 1 (* (pow alpha 6) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* 3/2 (/ (pow alpha 8) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 8) (- (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 15/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 5 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 5 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (+ (/ 1 (* (pow alpha 8) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* 5/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* -5 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 5 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 5 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* -3 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 3 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (* -3 (/ (pow alpha 2) (* (PI) (pow (log (/ 1 alpha)) 2))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (* (pow alpha 2) (- (* 2 (/ 1 (* (pow alpha 2) (* (PI) (pow (log (/ 1 alpha)) 2))))) (* 3 (/ 1 (* (PI) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* 2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (* 2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* -3/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (PI) (pow (log (/ 1 alpha)) 2))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (* (pow alpha 2) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (pow (log (/ 1 alpha)) 2))))) (* 3/2 (/ 1 (* (PI) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* -1/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* -1/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* 1/2 (/ (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/16 (/ (pow alpha 8) (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (+ (* 1/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4))))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4))))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (+ (/ 1/8 (* (pow alpha 2) (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4)))) (+ (/ 3/16 (* (pow alpha 4) (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4)))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4)))))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (+ (/ 1/8 (* (pow alpha 2) (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4)))) (+ (* 3/16 (/ 1 (* (pow alpha 4) (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4))))) (+ (* 1/8 (/ 1 (* (pow alpha 6) (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4))))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4))))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/2 (/ (pow alpha 8) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 19/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 30 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (/ 19/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 30 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 59/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (/ 19/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* 1/8 (/ (pow alpha 12) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 12) (- (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 21/4 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 21/4 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (+ (* 9/4 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -1/2 (/ (pow alpha 6) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (* 3/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (/ 3/4 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 3/4 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (/ 3/4 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (+ (* 3/4 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/2 (/ 1 (* (pow alpha 6) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* -1/2 (/ (pow alpha 6) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (+ (/ 1/2 (* (pow alpha 6) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* -1/2 (/ (pow alpha 6) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 6) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* 1/2 (/ (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 6) (- (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 3/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* 3/2 (/ (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1/2 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))) (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (/ 3/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* -3/2 (/ (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (- (* 12 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (- (/ 12 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 21 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 9 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (/ 12 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 21 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* -3/8 (/ (pow alpha 10) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 10) (- (* 21/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 10) (- (/ 21/8 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 21/8 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (* -3/8 (/ (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (* 21/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (/ 21/8 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 21/8 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* 3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 2) (- (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 3/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* (pow alpha 2) (- (* 3/2 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* -3/8 (/ (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 4) (- (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 4) (- (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 9/4 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* -1/4 (/ (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (/ 5/2 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (+ (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* -1/4 (/ (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (+ (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* -3/2 (/ (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (- (* 21/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (- (/ 21/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 39/2 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 17/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (/ 21/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -3/2 (/ (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (* 21/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (/ 21/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 39/2 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (/ 17/2 (* (pow alpha 6) (* (PI) (log (/ 1 alpha))))) (/ 21/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* -3/128 (/ (pow alpha 18) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 18) (- (* 3/32 (/ 1 (* (pow alpha 2) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))) (* 3/128 (/ 1 (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 18) (- (+ (/ 3/64 (* (pow alpha 4) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7)))) (/ 3/32 (* (pow alpha 2) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))) (* 3/128 (/ 1 (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 18) (- (+ (/ 3/32 (* (pow alpha 2) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7)))) (+ (* 3/64 (/ 1 (* (pow alpha 4) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))) (* 5/128 (/ 1 (* (pow alpha 6) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))) (* 3/128 (/ 1 (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* -1/32 (/ (pow alpha 14) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 14) (- (* 5/16 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))) (* 1/32 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 14) (- (/ 5/16 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (+ (/ 3/16 (* (pow alpha 4) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (* 1/32 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 14) (- (+ (* -1 (/ (+ (* 3/16 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (* 5/32 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))))) (pow alpha 4))) (/ 5/16 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))) (* 1/32 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 8) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 3/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 3/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (+ (* 3/2 (/ 1 (* (pow alpha 6) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 8) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 5/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (+ (* 3/4 (/ 1 (* (pow alpha 8) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 8) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))) (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* -1/64 (/ (pow alpha 18) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 18) (- (* 3/128 (/ 1 (* (pow alpha 2) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))) (* 1/64 (/ 1 (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 18) (- (+ (/ 3/128 (* (pow alpha 2) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7)))) (/ 3/128 (* (pow alpha 4) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))) (* 1/64 (/ 1 (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 18) (- (+ (/ 3/128 (* (pow alpha 2) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7)))) (+ (* 3/128 (/ 1 (* (pow alpha 4) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))) (* 3/64 (/ 1 (* (pow alpha 6) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))) (* 1/64 (/ 1 (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* -1/4 (/ (pow alpha 10) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 10) (- (* 7/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 10) (- (/ 7/8 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (+ (/ 5/8 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 10) (- (+ (* -1 (/ (+ (* 5/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 1/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))) (pow alpha 4))) (/ 7/8 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* 1/2 (/ (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1/2 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))) (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 3/2 (/ (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 9/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 3 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (/ 9/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (+ (* 3 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (* 3/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))) (/ 9/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 3/8 (/ (pow alpha 8) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 3/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* 3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 2) (- (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 3/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* 1/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* (pow alpha 2) (- (* 1/2 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* 1/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 2) (- (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 1/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (pow alpha 4) (* (PI) (log (/ 1 alpha))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (PI) (log (/ 1 alpha)))) (* 7/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1 (* (PI) (log (/ 1 alpha)))) (/ 5/2 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (/ 7/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1 (* (PI) (log (/ 1 alpha)))) (+ (* 5/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (* 3/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))) (/ 7/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (/ (pow alpha 4) (* (PI) (log (/ 1 alpha))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (PI) (log (/ 1 alpha)))) (* 7/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1 (* (PI) (log (/ 1 alpha)))) (/ 5/2 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (/ 7/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1 (* (PI) (log (/ 1 alpha)))) (+ (* 5/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (* 3/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))) (/ 7/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* 1/16 (/ (pow alpha 12) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 12) (- (* 1/16 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (* 3/32 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 12) (+ (* -1 (/ (+ (* 3/32 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (* 3/32 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))))) (pow alpha 2))) (* 1/16 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* -1 (/ (+ (* 3/32 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (* 1/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))))) (pow alpha 4))) (* 1/16 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))) (/ 3/32 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/64 (/ (pow alpha 12) (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 12) (+ (* 3/64 (/ 1 (* (pow alpha 2) (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6))))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 12) (+ (/ 3/64 (* (pow alpha 2) (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6)))) (+ (/ 3/32 (* (pow alpha 4) (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6)))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6)))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 12) (+ (/ 3/64 (* (pow alpha 2) (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6)))) (+ (* 3/32 (/ 1 (* (pow alpha 4) (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6))))) (+ (* 7/64 (/ 1 (* (pow alpha 6) (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6))))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6))))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* 1/8 (/ (pow alpha 12) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 12) (- (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 27/8 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 3/2 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 27/8 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (+ (* 2 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 3/2 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ -1/2 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (* 1/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (pow alpha 4))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (/ 1/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (+ (/ 1/2 (* (pow alpha 6) (* (PI) (log (/ 1 alpha))))) (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 4))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (+ (/ 1/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (* 1/2 (/ 1 (* (pow alpha 8) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 1/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))) (pow alpha 4))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (+ alpha 1) (PI)) #s(hole binary32 (/ alpha (PI))))
#s(approx (/ (+ alpha 1) (PI)) #s(hole binary32 (* alpha (+ (/ 1 (PI)) (/ 1 (* alpha (PI)))))))
#s(approx (+ alpha 1) #s(hole binary32 alpha))
#s(approx (+ alpha 1) #s(hole binary32 (* alpha (+ 1 (/ 1 alpha)))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ -1/2 (* alpha (* (pow cosTheta 2) (log (/ 1 alpha)))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (* 1/2 (/ 1 (* alpha (* (pow cosTheta 2) (log (/ 1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (log (/ 1 alpha)))))) alpha)))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (log (/ 1 alpha)))))) (/ 1/2 (* alpha (* (pow cosTheta 2) (log (/ 1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (log (/ 1 alpha)))))) alpha)))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 3) (* (pow cosTheta 4) (log (/ 1 alpha)))))) (/ 1/2 (* alpha (* (pow cosTheta 2) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (log (/ 1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (log (/ 1 alpha))))))) alpha)))
#s(approx (- alpha 1) #s(hole binary32 alpha))
#s(approx (- alpha 1) #s(hole binary32 (* alpha (- 1 (/ 1 alpha)))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (log (/ 1 alpha)))))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (log (/ 1 alpha)))) (* -2 (/ (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))) (pow alpha 2)))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* -2 (log (/ 1 alpha)))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (+ (/ 1 (pow alpha 2)) (pow cosTheta 2))))))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (pow alpha 2)))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (* (pow alpha 2) (- 1 (/ 1 (pow alpha 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow cosTheta 2))) (pow alpha 4))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* -1 (/ (* (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow cosTheta 2))) (+ (* -1 (/ (* (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow cosTheta 2))) (- 1 (pow cosTheta 2))) (pow cosTheta 2))) (* -1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow alpha 6))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow alpha 4) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 6))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4)))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* -2 (* (PI) (log (/ 1 alpha))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (/ 1 (pow alpha 2)) (pow cosTheta 2)) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (pow alpha 4))) (+ (/ 1 (pow alpha 2)) (pow cosTheta 2))) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (pow cosTheta 2) (pow alpha 6))) (+ (/ 1 (pow alpha 2)) (+ (/ (pow cosTheta 2) (pow alpha 6)) (pow cosTheta 2)))) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 4))) (+ (/ (pow cosTheta 2) (pow alpha 2)) (/ (pow cosTheta 2) (pow alpha 4))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (pow cosTheta 2)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (pow alpha 4))) (pow cosTheta 2)) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (pow cosTheta 2) (pow alpha 6))) (+ (/ (pow cosTheta 2) (pow alpha 6)) (pow cosTheta 2))) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 4))) (+ (/ (pow cosTheta 2) (pow alpha 2)) (/ (pow cosTheta 2) (pow alpha 4))))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) cosTheta)))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ cosTheta (* -1 (/ cosTheta (pow alpha 2)))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ cosTheta (* -1 (/ (+ cosTheta (* -1 cosTheta)) (pow alpha 4)))) (/ cosTheta (pow alpha 2))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ cosTheta (+ (* -1 (/ cosTheta (pow alpha 6))) (/ cosTheta (pow alpha 6)))) (+ (* -1 (/ cosTheta (pow alpha 4))) (+ (/ cosTheta (pow alpha 2)) (/ cosTheta (pow alpha 4))))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (pow alpha 2)))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (* (pow alpha 2) (- 1 (/ 1 (pow alpha 2))))))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (pow alpha 6)))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (* (pow alpha 6) (- 1 (/ 1 (pow alpha 6))))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (pow alpha 4)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (* (pow alpha 4) (+ 1 (/ 1 (pow alpha 2))))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (* (pow alpha 4) (+ 1 (+ (/ 1 (pow alpha 2)) (/ 1 (pow alpha 4)))))))
#s(approx (+ 1 (* alpha alpha)) #s(hole binary32 (pow alpha 2)))
#s(approx (+ 1 (* alpha alpha)) #s(hole binary32 (* (pow alpha 2) (+ 1 (/ 1 (pow alpha 2))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (/ (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (* (pow alpha 2) (- (/ 1 (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1))))) (/ 1 (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1))))))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))) (pow alpha 2))) (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (exp (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))))
#s(approx (pow (* alpha alpha) (PI)) #s(hole binary32 (exp (* -2 (* (PI) (log (/ 1 alpha)))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1))) 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* -1 (/ (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))))) (* 2 (/ (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 4) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (* 2 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))) (* 2 (/ (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 4) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow alpha 6) (pow cosTheta 4)))))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (* 2 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))) (pow cosTheta 2))) (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))))) (* (pow alpha 6) (pow cosTheta 2)))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (* 2 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))) (+ (* -1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* -1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))) (* (pow alpha 6) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))) (+ (* 2 (/ (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (* (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (* 2 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* (pow alpha 6) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 1/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* 7/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 1/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* 7/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)) (/ (* (pow cosTheta 2) (- (+ (* 5/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 17/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 9 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4))))) (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 4) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 1/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* 7/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 1/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* 7/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)) (/ (* (pow cosTheta 2) (- (+ (* 5/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 17/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 9 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4))))) (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 1/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow alpha 8) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (/ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* 7/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)) (/ (* (pow cosTheta 2) (- (+ (* 5/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 17/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 9 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4)))))) (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* 4 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 2) (- (* 4 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 4 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 2) (- (+ (* 4 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 4 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 4 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 2) (- (+ (* 4 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 4 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (* 4 (/ 1 (* (pow alpha 8) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 4 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* 1/4 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (+ (* 1/4 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) (* 1/4 (/ (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))) (pow alpha 2)))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (+ (* 1/4 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) (+ (* 1/4 (/ (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))) (pow alpha 2))) (* 1/4 (/ (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))) (pow alpha 4))))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/4 (/ (* (pow alpha 4) (+ (log -1) (* -1 (log (/ -1 alpha))))) (pow (PI) 2)))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (+ (* 1/4 (/ (+ (log -1) (* -1 (log (/ -1 alpha)))) (* (pow alpha 2) (pow (PI) 2)))) (* 1/4 (/ (+ (log -1) (* -1 (log (/ -1 alpha)))) (pow (PI) 2)))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (+ (* 1/4 (/ (+ (log -1) (* -1 (log (/ -1 alpha)))) (* (pow alpha 2) (pow (PI) 2)))) (+ (* 1/4 (/ (+ (log -1) (* -1 (log (/ -1 alpha)))) (* (pow alpha 4) (pow (PI) 2)))) (* 1/4 (/ (+ (log -1) (* -1 (log (/ -1 alpha)))) (pow (PI) 2))))))))
#s(approx (pow (log alpha) 3) #s(hole binary32 (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))
#s(approx (log alpha) #s(hole binary32 (+ (log -1) (* -1 (log (/ -1 alpha))))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (+ (* 1/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (+ (/ 1/4 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (+ (/ 1/4 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (+ (* 1/4 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))
#s(approx (* (* (PI) (PI)) (pow (log alpha) 2)) #s(hole binary32 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))
#s(approx (pow (log alpha) 2) #s(hole binary32 (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))
#s(approx (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))
#s(approx (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 4) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (/ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* 7/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* 7/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)) (/ (* (pow cosTheta 2) (- (+ (* 5/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 17/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 9 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4)))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 3/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ 3 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 7/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 3/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ 3 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ (* (pow cosTheta 2) (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 17/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 9 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4)) (/ (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 7/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 3/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ 3 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2))))) (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 3/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ 3 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ (* (pow cosTheta 2) (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 17/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 9 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4)) (/ (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))) (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 3 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 3/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ 3 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ (* (pow cosTheta 2) (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 17/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 9 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4)) (/ (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))) (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3/2 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 21 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 39/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* -1/2 (/ (pow cosTheta 2) (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 21 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 39/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* 3/2 (/ (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* -3 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 12 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* -3 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 2 (/ (pow cosTheta 2) (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (/ 12 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* -3 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* -1/2 (/ (pow cosTheta 2) (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 2 (/ (pow cosTheta 2) (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))) (+ (/ 9 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 12 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* -3 (/ (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 1/2 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* -1/2 (/ (pow alpha 8) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (* 25/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (/ 25/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 54 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 139/2 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 25/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 54 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* -1/8 (/ (pow alpha 12) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 12) (- (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 12) (- (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 21/2 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 7 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (+ (* 21/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (* -1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (* (pow alpha 6) (- (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (* (pow alpha 6) (- (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 21/2 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 7 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 21/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* -3 (/ (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* (pow alpha 2) (- (* 2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 3 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* -3 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 2) (- (* 2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) #s(hole binary32 (* 3 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (* alpha alpha) (* (PI) (log alpha))) #s(hole binary32 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (* (PI) (log alpha)) #s(hole binary32 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))
#s(approx (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* 2 (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (/ 2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (/ 1 (* (PI) (log alpha))) #s(hole binary32 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (* -1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (* (pow alpha 6) (- (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (* (pow alpha 6) (- (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 39/4 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 13/2 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 39/4 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (* 3/2 (/ (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 15/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 5 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 3/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 15/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 5 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* 3 (/ (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* 3/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 9/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 5 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 9/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* 3/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 3/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 2) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (* 3/2 (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (/ 3/2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 2) (- (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (/ 2 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (* -1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 6 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 4 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 6 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (* 3/4 (/ (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 3/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 3/2 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (pow (PI) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) #s(hole binary32 (* (pow alpha 2) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3/2 (/ 1 (* (pow (PI) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) #s(hole binary32 (* (pow alpha 2) (- (/ 1 (* (pow alpha 2) (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 1/2 (/ 1 (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* -1/2 (/ (pow alpha 8) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 8) (- (* 25/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 8) (- (/ 25/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 51 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 135/2 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 25/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 51 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ 4 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (* 4 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 4 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (+ (* 4 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 4 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 4 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (pow alpha 4))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (+ (* 4 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 4 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (* 4 (/ 1 (* (pow alpha 8) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 4 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -1/2 (/ (pow alpha 8) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 8) (- (* 25/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 8) (- (/ 25/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 51 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 135/2 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 25/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 51 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* 3 (/ (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 38 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 21 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 38 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (* 17 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 21 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* 3/16 (/ (pow alpha 14) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 14) (- (* 3/16 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))) (* 15/16 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 14) (- (+ (/ 5/16 (* (pow alpha 4) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))) (* 3/16 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (/ 15/16 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 14) (- (+ (* 5/16 (/ 1 (* (pow alpha 4) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (+ (* 1/8 (/ 1 (* (pow alpha 6) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (* 3/16 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))))) (/ 15/16 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) #s(hole binary32 (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) #s(hole binary32 (* (pow alpha 6) (- (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 1/8 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) #s(hole binary32 (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))) #s(hole binary32 (/ (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))
#s(approx (* (pow (PI) 3) (pow (log alpha) 3)) #s(hole binary32 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))
#s(approx (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) #s(hole binary32 (/ 1/8 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))
#s(approx (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))) #s(hole binary32 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* 3/2 (/ (pow alpha 8) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 8) (- (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 15/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 5/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (+ (* 5/2 (/ 1 (* (pow alpha 6) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* 3/2 (/ (pow alpha 8) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 8) (- (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 15/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 5 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 5 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (+ (/ 1 (* (pow alpha 8) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* 5/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 5/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* -5 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 5 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 5 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* -3 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 3 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (* -3 (/ (pow alpha 2) (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (* (pow alpha 2) (- (* 2 (/ 1 (* (pow alpha 2) (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 3 (/ 1 (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* 2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (* 2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* -3/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (* (pow alpha 2) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 3/2 (/ 1 (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* -1/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* -1/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* -1/2 (/ (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/16 (/ (pow alpha 8) (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (+ (* 1/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4))))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4))))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (+ (/ 1/8 (* (pow alpha 2) (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4)))) (+ (/ 3/16 (* (pow alpha 4) (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4)))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4)))))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (+ (/ 1/8 (* (pow alpha 2) (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4)))) (+ (* 3/16 (/ 1 (* (pow alpha 4) (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4))))) (+ (* 1/8 (/ 1 (* (pow alpha 6) (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4))))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4))))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* -1/2 (/ (pow alpha 8) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (* 19/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (/ 19/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 30 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 59/2 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 19/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 30 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* -1/8 (/ (pow alpha 12) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 12) (- (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 12) (- (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 21/4 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 9/4 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 21/4 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -1/2 (/ (pow alpha 6) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (* 3/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (/ 3/4 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 3/4 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (/ 3/4 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (+ (* 3/4 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/2 (/ 1 (* (pow alpha 6) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* -1/2 (/ (pow alpha 6) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (+ (/ 1/2 (* (pow alpha 6) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* -1/2 (/ (pow alpha 6) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 6) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* -1/2 (/ (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 6) (- (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 3/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* -3/2 (/ (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 3/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 1/2 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 3/2 (/ (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (- (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 12 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 21 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 12 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (* 9 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 12 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* 3/8 (/ (pow alpha 10) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 10) (- (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 21/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 10) (- (+ (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 21/8 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 21/8 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (* 3/8 (/ (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 21/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 21/8 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 21/8 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* -3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 2) (- (* 3/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* (pow alpha 2) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 3/2 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* 3/8 (/ (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 4) (- (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 9/4 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* 3/2 (/ (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (- (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 39/2 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 21/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 39/2 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (* 17/2 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 21/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* 3/2 (/ (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 39/2 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 21/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 39/2 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 17/2 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 21/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* 3/128 (/ (pow alpha 18) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 18) (- (* 3/128 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))) (* 3/32 (/ 1 (* (pow alpha 2) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 18) (+ (* -1 (/ (+ (* 3/32 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))) (* 3/64 (/ 1 (* (pow alpha 2) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))))) (pow alpha 2))) (* 3/128 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7))))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 18) (- (+ (* -1 (/ (+ (* 3/64 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))) (* 5/128 (/ 1 (* (pow alpha 2) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))))) (pow alpha 4))) (* 3/128 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7))))) (/ 3/32 (* (pow alpha 2) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* 1/32 (/ (pow alpha 14) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 14) (- (* 1/32 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))) (* 5/16 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 14) (- (+ (/ 3/16 (* (pow alpha 4) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))) (* 1/32 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (/ 5/16 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 14) (- (+ (* 3/16 (/ 1 (* (pow alpha 4) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (+ (* 5/32 (/ 1 (* (pow alpha 6) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (* 1/32 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))))) (/ 5/16 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 8) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 3/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 3/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (+ (* 3/2 (/ 1 (* (pow alpha 6) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 8) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 5/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (+ (* 3/4 (/ 1 (* (pow alpha 8) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 8) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))) (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* 1/64 (/ (pow alpha 18) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 18) (- (* 1/64 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))) (* 3/128 (/ 1 (* (pow alpha 2) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 18) (+ (* -1 (/ (+ (* 3/128 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))) (* 3/128 (/ 1 (* (pow alpha 2) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))))) (pow alpha 2))) (* 1/64 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 18) (+ (* -1 (/ (+ (* 3/128 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))) (+ (/ 3/128 (* (pow alpha 2) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))) (* 3/64 (/ 1 (* (pow alpha 4) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7))))))) (pow alpha 2))) (* 1/64 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 10) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 10) (- (* 1/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 7/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 10) (- (+ (/ 5/8 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 7/8 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 10) (- (+ (* 5/8 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (+ (* 1/8 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))) (/ 7/8 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* -1/2 (/ (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 1/2 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* -3/2 (/ (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (* 9/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (/ 9/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 3 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4))) (/ 9/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* -3/8 (/ (pow alpha 8) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (* 3/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* -3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 2) (- (* 3/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* (pow alpha 2) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 1/2 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* -1/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 2) (- (* 1/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* -1 (/ (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (* 7/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 7/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) (/ 5/2 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (+ (* 5/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4))) (/ 7/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -1 (/ (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (* 7/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 7/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) (/ 5/2 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (+ (* 5/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4))) (/ 7/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* -1/16 (/ (pow alpha 12) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 12) (- (* 3/32 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (* 1/16 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (/ 3/32 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))) (/ 3/32 (* (pow alpha 4) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (* 1/16 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (/ 3/32 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))) (+ (* 3/32 (/ 1 (* (pow alpha 4) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (* 1/8 (/ 1 (* (pow alpha 6) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))) (* 1/16 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/64 (/ (pow alpha 12) (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 12) (+ (* 3/64 (/ 1 (* (pow alpha 2) (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6))))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 12) (+ (/ 3/64 (* (pow alpha 2) (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6)))) (+ (/ 3/32 (* (pow alpha 4) (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6)))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6)))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 12) (+ (/ 3/64 (* (pow alpha 2) (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6)))) (+ (* 3/32 (/ 1 (* (pow alpha 4) (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6))))) (+ (* 7/64 (/ 1 (* (pow alpha 6) (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6))))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6))))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* -1/8 (/ (pow alpha 12) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 12) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 12) (- (/ 3/2 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 27/8 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 2 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 3/2 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (+ (* 27/8 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ 1/2 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (+ (/ 1/2 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 1/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (pow alpha 4))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 1/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow alpha 8) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (pow alpha 4))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (+ (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ -1/2 (* alpha (* (pow cosTheta 2) (log (/ -1 alpha)))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (* -1 (/ (- (* 1/2 (/ 1 (* (pow cosTheta 2) (log (/ -1 alpha))))) (* 1/2 (/ 1 (* alpha (* (pow cosTheta 2) (log (/ -1 alpha))))))) alpha))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* alpha (* (pow cosTheta 4) (log (/ -1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (log (/ -1 alpha)))))) alpha)) (* 1/2 (/ 1 (* (pow cosTheta 2) (log (/ -1 alpha)))))) alpha))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (/ -1 alpha))))) (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* alpha (* (pow cosTheta 4) (log (/ -1 alpha))))))) alpha)) (* 1/2 (/ 1 (* (pow cosTheta 2) (log (/ -1 alpha)))))) alpha)) (* 1/2 (/ 1 (* (pow cosTheta 2) (log (/ -1 alpha)))))) alpha))))
#s(approx (- alpha 1) #s(hole binary32 (* -1 (* alpha (- (/ 1 alpha) 1)))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (log (/ -1 alpha)))))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (log (/ -1 alpha)))) (* -2 (/ (* (log (/ -1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))) (pow alpha 2)))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* -2 (log (/ -1 alpha)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow cosTheta 2))) (pow alpha 4))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* -1 (/ (* (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow cosTheta 2))) (+ (* -1 (/ (* (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow cosTheta 2))) (- 1 (pow cosTheta 2))) (pow cosTheta 2))) (* -1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow alpha 6))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow alpha 4) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 6))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4)))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* -2 (* (PI) (log (/ -1 alpha))))))
#s(approx (pow (* alpha alpha) (PI)) #s(hole binary32 (exp (* -2 (* (PI) (log (/ -1 alpha)))))))
Calls

6 calls:

TimeVariablePointExpression
363.0ms
cosTheta
@inf
((/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (pow alpha 6) alpha 6 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (pow (PI) 3) (PI) 3 (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (pow (log alpha) 3) (log alpha) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))) 1 (* (* (PI) (PI)) (pow (log alpha) 2)) (* (PI) (PI)) (pow (log alpha) 2) 2 (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))) (pow alpha 4) 4 (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))) (* alpha alpha) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* cosTheta cosTheta) cosTheta (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) 3/2 (/ (* alpha alpha) (* (PI) (log alpha))) (* (PI) (log alpha)) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) -1/2 (* 2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* 3/2 (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))) (* (pow (PI) 3) (pow (log alpha) 3)) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) 3/4 (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) 3/8 (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (/ (+ alpha 1) (PI)) (+ alpha 1) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (- (* alpha alpha) 1) (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (- (pow (* alpha alpha) 3) 1) (pow (* alpha alpha) 3) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+ 1 (* alpha alpha)) (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (pow (* alpha alpha) (PI)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))))
229.0ms
alpha
@-inf
((/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (pow alpha 6) alpha 6 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (pow (PI) 3) (PI) 3 (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (pow (log alpha) 3) (log alpha) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))) 1 (* (* (PI) (PI)) (pow (log alpha) 2)) (* (PI) (PI)) (pow (log alpha) 2) 2 (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))) (pow alpha 4) 4 (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))) (* alpha alpha) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* cosTheta cosTheta) cosTheta (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) 3/2 (/ (* alpha alpha) (* (PI) (log alpha))) (* (PI) (log alpha)) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) -1/2 (* 2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* 3/2 (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))) (* (pow (PI) 3) (pow (log alpha) 3)) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) 3/4 (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) 3/8 (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (/ (+ alpha 1) (PI)) (+ alpha 1) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (- (* alpha alpha) 1) (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (- (pow (* alpha alpha) 3) 1) (pow (* alpha alpha) 3) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+ 1 (* alpha alpha)) (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (pow (* alpha alpha) (PI)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))))
193.0ms
alpha
@inf
((/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (pow alpha 6) alpha 6 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (pow (PI) 3) (PI) 3 (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (pow (log alpha) 3) (log alpha) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))) 1 (* (* (PI) (PI)) (pow (log alpha) 2)) (* (PI) (PI)) (pow (log alpha) 2) 2 (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))) (pow alpha 4) 4 (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))) (* alpha alpha) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* cosTheta cosTheta) cosTheta (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) 3/2 (/ (* alpha alpha) (* (PI) (log alpha))) (* (PI) (log alpha)) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) -1/2 (* 2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* 3/2 (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))) (* (pow (PI) 3) (pow (log alpha) 3)) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) 3/4 (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) 3/8 (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (/ (+ alpha 1) (PI)) (+ alpha 1) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (- (* alpha alpha) 1) (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (- (pow (* alpha alpha) 3) 1) (pow (* alpha alpha) 3) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+ 1 (* alpha alpha)) (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (pow (* alpha alpha) (PI)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))))
185.0ms
alpha
@0
((/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (pow alpha 6) alpha 6 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (pow (PI) 3) (PI) 3 (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (pow (log alpha) 3) (log alpha) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))) 1 (* (* (PI) (PI)) (pow (log alpha) 2)) (* (PI) (PI)) (pow (log alpha) 2) 2 (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))) (pow alpha 4) 4 (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))) (* alpha alpha) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* cosTheta cosTheta) cosTheta (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) 3/2 (/ (* alpha alpha) (* (PI) (log alpha))) (* (PI) (log alpha)) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) -1/2 (* 2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* 3/2 (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))) (* (pow (PI) 3) (pow (log alpha) 3)) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) 3/4 (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) 3/8 (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (/ (+ alpha 1) (PI)) (+ alpha 1) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (- (* alpha alpha) 1) (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (- (pow (* alpha alpha) 3) 1) (pow (* alpha alpha) 3) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+ 1 (* alpha alpha)) (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (pow (* alpha alpha) (PI)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))))
139.0ms
cosTheta
@0
((/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (pow alpha 6) alpha 6 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (pow (PI) 3) (PI) 3 (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (pow (log alpha) 3) (log alpha) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))) 1 (* (* (PI) (PI)) (pow (log alpha) 2)) (* (PI) (PI)) (pow (log alpha) 2) 2 (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))) (pow alpha 4) 4 (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))) (* alpha alpha) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* cosTheta cosTheta) cosTheta (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) 3/2 (/ (* alpha alpha) (* (PI) (log alpha))) (* (PI) (log alpha)) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) -1/2 (* 2 (/ 1 (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* 3/2 (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))) (* (pow (PI) 3) (pow (log alpha) 3)) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) 3/4 (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) 3/8 (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (/ (+ alpha 1) (PI)) (+ alpha 1) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (- (* alpha alpha) 1) (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (- (pow (* alpha alpha) 3) 1) (pow (* alpha alpha) 3) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+ 1 (* alpha alpha)) (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (pow (* alpha alpha) (PI)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))))

rewrite3.3s (3.5%)

Memory
24.3MiB live, 3 767.5MiB allocated; 1.6s collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05834921762
06328744726
08637742618
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
1 425 → 1 557
Calls
Call 1
Inputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(literal 1/8 binary32)
(/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(pow.f32 alpha #s(literal 6 binary32))
alpha
#s(literal 6 binary32)
(*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(pow.f32 (PI.f32) #s(literal 3 binary32))
(PI.f32)
#s(literal 3 binary32)
(*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(pow.f32 (log.f32 alpha) #s(literal 3 binary32))
(log.f32 alpha)
(-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
(fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(literal 1/4 binary32)
(/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
#s(literal 1 binary32)
(*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))
(*.f32 (PI.f32) (PI.f32))
(pow.f32 (log.f32 alpha) #s(literal 2 binary32))
#s(literal 2 binary32)
(*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
(pow.f32 alpha #s(literal 4 binary32))
#s(literal 4 binary32)
(*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(literal -1/4 binary32)
(/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
(*.f32 alpha alpha)
(*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(*.f32 cosTheta cosTheta)
cosTheta
(-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))))))
(fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))
(/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
(fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(literal -1 binary32)
(-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))))
(*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))
#s(literal 3/2 binary32)
(/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))
(*.f32 (PI.f32) (log.f32 alpha))
(*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))
(-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))
#s(literal -1/2 binary32)
(*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))
(fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))))
#s(literal 1/2 binary32)
(/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha)))
(fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha)))
(fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
(*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
(fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
(*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))
(fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
(/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))
(fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
(*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))
(/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32))
(/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))
(fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
#s(literal 5/4 binary32)
(/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
(-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))
(*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
(/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))
(*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))
(*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
(/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))
(-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
(fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha)))
(/.f32 (*.f32 alpha alpha) (PI.f32))
(/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))
(*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha)))
(/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))
(*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
(/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))
(*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
(-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))
(*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))))
(+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
(fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha)))
(/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))
(fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
#s(literal 3/4 binary32)
(/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
(*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))))
(*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))
(*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
(*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
(/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
(*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
#s(literal 3/8 binary32)
(/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (PI.f32)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
(/.f32 (+.f32 alpha #s(literal 1 binary32)) (PI.f32))
(+.f32 alpha #s(literal 1 binary32))
(/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(-.f32 alpha #s(literal 1 binary32))
(*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(log.f32 (*.f32 alpha alpha))
(fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))
(-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta))))
(*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta)))
(*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha)))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta))
(*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta)
(*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta)
(/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))
(-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32))
(pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))
(+.f32 #s(literal 1 binary32) (*.f32 alpha alpha))
(/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) #s(literal 1 binary32))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))))
(-.f32 (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) #s(literal 1 binary32)))
(*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
(log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(pow.f32 (*.f32 alpha alpha) (PI.f32))
(*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) #s(literal 1 binary32))
(*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (PI) (log (pow alpha 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 2)) (* (PI) (log (pow alpha 2))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 3)) (* (PI) (log (pow alpha 2)))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (pow (- (pow alpha 2) 1) 4)) (* (PI) (log (pow alpha 2))))) (* -1 (/ (pow (- (pow alpha 2) 1) 3) (* (PI) (log (pow alpha 2))))))) (/ (pow (- (pow alpha 2) 1) 2) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 1/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (* 1/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (* 1/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))) (* 1/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)))))))
#s(approx (* cosTheta cosTheta) #s(hole binary32 (pow cosTheta 2)))
#s(approx cosTheta #s(hole binary32 cosTheta))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (/ (* (+ 1 alpha) (- alpha 1)) (* (PI) (log (pow alpha 2))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* -1 (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1)))) (* (PI) (log (pow alpha 2))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (PI) (log (pow alpha 2)))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2)))) (* (PI) (log (pow alpha 2)))) (/ (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2)))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (PI) (log (pow alpha 2)))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 3)))) (* (PI) (log (pow alpha 2))))) (* -1 (/ (* (+ 1 alpha) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2))) (* (PI) (log (pow alpha 2))))))) (/ (* (+ 1 alpha) (* (- alpha 1) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2)))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- alpha 1) (log (pow alpha 2)))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (* (- alpha 1) (- (pow alpha 2) 1))) (log (pow alpha 2)))) (/ alpha (log (pow alpha 2)))) (/ 1 (log (pow alpha 2))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (- alpha 1) (pow (- (pow alpha 2) 1) 2))) (log (pow alpha 2))) (/ (* (- alpha 1) (- (pow alpha 2) 1)) (log (pow alpha 2))))) (/ alpha (log (pow alpha 2)))) (/ 1 (log (pow alpha 2))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (- alpha 1) (pow (- (pow alpha 2) 1) 3))) (log (pow alpha 2)))) (* -1 (/ (* (- alpha 1) (pow (- (pow alpha 2) 1) 2)) (log (pow alpha 2)))))) (/ (* (- alpha 1) (- (pow alpha 2) 1)) (log (pow alpha 2))))) (/ alpha (log (pow alpha 2)))) (/ 1 (log (pow alpha 2))))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (log (pow alpha 2))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (+ (log (pow alpha 2)) (* (pow cosTheta 2) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 1))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (PI) (log (pow alpha 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow cosTheta 2) (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (/ (* (pow cosTheta 2) (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2)))) (/ (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 2) 1)) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1 (/ (* (pow cosTheta 2) (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3) (- (pow alpha 2) 1))) (* (PI) (log (pow alpha 2))))) (* -1 (/ (* (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2) (- (pow alpha 2) 1)) (* (PI) (log (pow alpha 2))))))) (/ (* (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (- (pow alpha 2) 1)) (* (PI) (log (pow alpha 2)))))) (/ (pow alpha 2) (* (PI) (log (pow alpha 2))))) (/ 1 (* (PI) (log (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (PI) (log (pow alpha 2)))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* (PI) (log (pow alpha 2))) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 1))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* (pow cosTheta 2) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (/ (* (pow cosTheta 2) (- (pow alpha 6) 1)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (/ (* cosTheta (- (pow alpha 6) 1)) (+ 1 (+ (pow alpha 2) (pow alpha 4))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (/ (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI)))) (pow (log (pow (pow alpha 2) (PI))) 2))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (+ (/ 1 (log (pow (pow alpha 2) (PI)))) (/ (* (pow alpha 2) (- (pow alpha 2) 1)) (log (pow (pow alpha 2) (PI))))) (+ (* 2 (/ (* (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))) (/ 1 (log (pow (pow alpha 2) (PI)))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (* 1/24 (/ (* (pow alpha 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))) (pow (log (pow (pow alpha 2) (PI))) 2))) (+ (* 1/24 (/ (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (pow (log (pow (pow alpha 2) (PI))) 2))) (+ (* 2 (* (- (+ (/ 1 (log (pow (pow alpha 2) (PI)))) (/ (* (pow alpha 2) (- (pow alpha 2) 1)) (log (pow (pow alpha 2) (PI))))) (+ (* 2 (/ (* (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI)))))) (- (pow alpha 2) 1))) (/ (* (+ (* 1/12 (* (log (pow (pow alpha 2) (PI))) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI))))) (pow (log (pow (pow alpha 2) (PI))) 4)))))) (+ (/ 1 (log (pow (pow alpha 2) (PI)))) (/ (* (pow alpha 2) (- (pow alpha 2) 1)) (log (pow (pow alpha 2) (PI)))))) (+ (* 2 (/ (* (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))) (/ 1 (log (pow (pow alpha 2) (PI)))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (- (+ (* (pow cosTheta 2) (- (+ (* (pow cosTheta 2) (- (+ (* 1/24 (/ (* (pow alpha 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))) (pow (log (pow (pow alpha 2) (PI))) 2))) (* (pow cosTheta 2) (- (* 1/720 (/ (* (pow alpha 2) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3)))))) (pow (log (pow (pow alpha 2) (PI))) 2))) (+ (* 1/720 (/ (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))) (pow (log (pow (pow alpha 2) (PI))) 2))) (+ (* 2 (* (- (* 1/24 (/ (* (pow alpha 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))) (pow (log (pow (pow alpha 2) (PI))) 2))) (+ (* 1/24 (/ (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (pow (log (pow (pow alpha 2) (PI))) 2))) (+ (* 2 (* (- (+ (/ 1 (log (pow (pow alpha 2) (PI)))) (/ (* (pow alpha 2) (- (pow alpha 2) 1)) (log (pow (pow alpha 2) (PI))))) (+ (* 2 (/ (* (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI)))))) (- (pow alpha 2) 1))) (/ (* (+ (* 1/12 (* (log (pow (pow alpha 2) (PI))) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI))))) (pow (log (pow (pow alpha 2) (PI))) 4))))) (- (pow alpha 2) 1))) (+ (/ (* (+ (* 1/360 (* (log (pow (pow alpha 2) (PI))) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))) (* 1/12 (* (log (pow (pow alpha 2) (PI))) (* (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (- (pow alpha 2) 1))))) (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI))))) (pow (log (pow (pow alpha 2) (PI))) 4)) (/ (* (+ (* 1/12 (* (log (pow (pow alpha 2) (PI))) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (- (+ (/ 1 (log (pow (pow alpha 2) (PI)))) (/ (* (pow alpha 2) (- (pow alpha 2) 1)) (log (pow (pow alpha 2) (PI))))) (+ (* 2 (/ (* (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))))) (pow (log (pow (pow alpha 2) (PI))) 2)))))))) (+ (* 1/24 (/ (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (pow (log (pow (pow alpha 2) (PI))) 2))) (+ (* 2 (* (- (+ (/ 1 (log (pow (pow alpha 2) (PI)))) (/ (* (pow alpha 2) (- (pow alpha 2) 1)) (log (pow (pow alpha 2) (PI))))) (+ (* 2 (/ (* (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI)))))) (- (pow alpha 2) 1))) (/ (* (+ (* 1/12 (* (log (pow (pow alpha 2) (PI))) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI))))) (pow (log (pow (pow alpha 2) (PI))) 4)))))) (+ (/ 1 (log (pow (pow alpha 2) (PI)))) (/ (* (pow alpha 2) (- (pow alpha 2) 1)) (log (pow (pow alpha 2) (PI)))))) (+ (* 2 (/ (* (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI)))) (- (pow alpha 2) 1)) (pow (log (pow (pow alpha 2) (PI))) 2))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))))) (/ (pow alpha 2) (log (pow (pow alpha 2) (PI))))) (/ 1 (log (pow (pow alpha 2) (PI)))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (- (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (log (pow (pow alpha 2) (PI))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (- (+ (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (* (pow cosTheta 2) (- (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))) (log (pow (pow alpha 2) (PI))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (- (+ (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (* (pow cosTheta 2) (- (+ (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))) (* (pow cosTheta 2) (- (* 1/24 (* (pow alpha 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* 1/24 (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))))) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))) (log (pow (pow alpha 2) (PI))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (- (+ (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (* (pow cosTheta 2) (- (+ (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))) (* (pow cosTheta 2) (- (+ (* 1/24 (* (pow alpha 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (pow cosTheta 2) (- (* 1/720 (* (pow alpha 2) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))) (* 1/720 (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))))) (* 1/24 (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))))) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))) (log (pow (pow alpha 2) (PI))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* (pow alpha 2) (log (pow (pow alpha 2) (PI))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (* (pow alpha 2) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (* (pow cosTheta 2) (+ (* 1/24 (* (pow alpha 2) (* (pow cosTheta 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))))) (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* (pow alpha 2) (log (pow (pow alpha 2) (PI)))) (* (pow cosTheta 2) (+ (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))) (* (pow cosTheta 2) (+ (* 1/720 (* (pow alpha 2) (* (pow cosTheta 2) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3)))))))) (* 1/24 (* (pow alpha 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (log (pow (pow alpha 2) (PI)))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (+ (* 1/24 (* (pow cosTheta 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (+ (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)) (* (pow cosTheta 2) (+ (* 1/720 (* (pow cosTheta 2) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))) (* 1/24 (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (pow (pow alpha 2) (PI))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (+ (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (* (- (pow alpha 2) 1) (pow (pow alpha 2) (PI))))) (pow (pow alpha 2) (PI)))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* 1/2 (* (pow cosTheta 2) (* (pow (log (pow (pow alpha 2) (PI))) 2) (* (pow (- (pow alpha 2) 1) 2) (pow (pow alpha 2) (PI)))))) (* (log (pow (pow alpha 2) (PI))) (* (- (pow alpha 2) 1) (pow (pow alpha 2) (PI)))))) (pow (pow alpha 2) (PI)))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* (log (pow (pow alpha 2) (PI))) (* (- (pow alpha 2) 1) (pow (pow alpha 2) (PI)))) (* (pow cosTheta 2) (+ (* 1/6 (* (pow cosTheta 2) (* (pow (log (pow (pow alpha 2) (PI))) 3) (* (pow (- (pow alpha 2) 1) 3) (pow (pow alpha 2) (PI)))))) (* 1/2 (* (pow (log (pow (pow alpha 2) (PI))) 2) (* (pow (- (pow alpha 2) 1) 2) (pow (pow alpha 2) (PI))))))))) (pow (pow alpha 2) (PI)))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (log (pow (pow alpha 2) (PI)))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (+ (* 1/24 (* (pow cosTheta 2) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (+ (log (pow (pow alpha 2) (PI))) (* (pow cosTheta 2) (+ (* (log (pow (pow alpha 2) (PI))) (- (pow alpha 2) 1)) (* (pow cosTheta 2) (+ (* 1/720 (* (pow cosTheta 2) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))) (* 1/24 (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (pow (log (pow (pow alpha 2) (PI))) 2)))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* 2 (* (pow cosTheta 2) (* (pow (log (pow (pow alpha 2) (PI))) 2) (- (pow alpha 2) 1)))) (pow (log (pow (pow alpha 2) (PI))) 2))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* 2 (* (pow (log (pow (pow alpha 2) (PI))) 2) (- (pow alpha 2) 1))) (* (pow cosTheta 2) (+ (* 1/12 (* (log (pow (pow alpha 2) (PI))) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (pow (log (pow (pow alpha 2) (PI))) 2))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* (pow cosTheta 2) (+ (* 2 (* (pow (log (pow (pow alpha 2) (PI))) 2) (- (pow alpha 2) 1))) (* (pow cosTheta 2) (+ (* 1/12 (* (log (pow (pow alpha 2) (PI))) (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))))) (+ (* (pow cosTheta 2) (+ (* 1/360 (* (log (pow (pow alpha 2) (PI))) (+ (* -360 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (+ (* 120 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))) (* 240 (* (pow (log (pow (pow alpha 2) (PI))) 3) (pow (- (pow alpha 2) 1) 3))))))) (* 1/12 (* (log (pow (pow alpha 2) (PI))) (* (+ (* -12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))) (* 12 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2)))) (- (pow alpha 2) 1)))))) (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (pow alpha 2) 1) 2))))))) (pow (log (pow (pow alpha 2) (PI))) 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ 1 (* (pow cosTheta 2) (* (PI) (log (pow alpha 2)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (PI) (log (pow alpha 2)))) (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3))))))) (pow cosTheta 2))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ 1/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (- (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (/ 3/2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* 2 (/ (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))) (pow cosTheta 2)))) (pow cosTheta 2))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (- (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 3 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (/ 3/2 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))) (pow cosTheta 2))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))) (pow cosTheta 4))) (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (- (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))))))) (pow cosTheta 4)))))) (pow cosTheta 2))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (- (+ (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (+ (* (pow alpha 6) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 3)) (* 5/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))) (pow cosTheta 6))) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* 3 (/ 1 (* (pow cosTheta 4) (* (PI) (log alpha))))) (/ 3/2 (* (pow cosTheta 2) (* (PI) (log alpha))))))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))) (pow cosTheta 2))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))) (pow cosTheta 4))) (+ (* 2 (/ (* (PI) (* (log alpha) (- (+ (* 2 (* (pow alpha 4) (* (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))) (* -1 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))))) (pow cosTheta 6))) (+ (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (- (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))))))) (pow cosTheta 4))) (+ (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (- (* 3 (/ 1 (* (PI) (log alpha)))) (+ (* 2 (* (PI) (* (log alpha) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))))) (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))) (- (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha)))))))))))))))))) (pow cosTheta 6))) (* 4 (/ (* (pow (PI) 2) (* (pow (log alpha) 2) (* (- (* 3/2 (/ 1 (* (PI) (log alpha)))) (* 2 (* (PI) (* (log alpha) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (pow (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))) 2))) (* -1/2 (- (* -1 (/ (* (pow alpha 2) (+ (* -1 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))))))))) (pow cosTheta 6))))))))) (pow cosTheta 2))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 3/8 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* (pow cosTheta 4) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (+ (* 1/8 (/ (pow alpha 6) (* (pow cosTheta 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 1/8 (* (pow cosTheta 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 3/8 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* (pow cosTheta 4) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 3/8 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* (pow cosTheta 4) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (+ (* 1/8 (/ (pow alpha 6) (* (pow cosTheta 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 3/8 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* (pow cosTheta 4) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow cosTheta 6) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 3/8 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* (pow cosTheta 4) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 4) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 4) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 4) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 3/8 (/ 1 (* (pow cosTheta 4) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (* (pow cosTheta 4) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow cosTheta 4) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow cosTheta 4) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow cosTheta 4) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (pow cosTheta 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ 3/4 (* (pow cosTheta 2) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow cosTheta 2) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow cosTheta 2) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/ (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (+ (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (pow (PI) 2) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))) (* (PI) (log alpha)))) (/ (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2)) (/ (* (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ (* (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (pow (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) 2))))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* (PI) (log alpha))) (* -1 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (pow (PI) 2) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))) (pow (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))) 2))))) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (/ (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (/ (- (+ (/ (* (+ 1 alpha) (- alpha 1)) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (pow cosTheta 2))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 4)))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (PI) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))) (+ (* -1 (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))))) (/ (* (+ 1 alpha) (- alpha 1)) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2))))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- alpha 1) (* (pow cosTheta 2) (* (log (pow alpha 2)) (- (pow alpha 2) 1))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))) (/ alpha (* (log (pow alpha 2)) (- (pow alpha 2) 1)))) (+ (/ 1 (* (log (pow alpha 2)) (- (pow alpha 2) 1))) (/ alpha (* (pow cosTheta 2) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))) (+ (/ alpha (* (log (pow alpha 2)) (- (pow alpha 2) 1))) (/ alpha (* (pow cosTheta 4) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))))) (+ (/ 1 (* (log (pow alpha 2)) (- (pow alpha 2) 1))) (+ (/ 1 (* (pow cosTheta 4) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))) (/ alpha (* (pow cosTheta 2) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2))))))) (pow cosTheta 2))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))) (+ (/ 1 (* (pow cosTheta 6) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 4)))) (+ (/ alpha (* (log (pow alpha 2)) (- (pow alpha 2) 1))) (/ alpha (* (pow cosTheta 4) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3))))))) (+ (/ 1 (* (log (pow alpha 2)) (- (pow alpha 2) 1))) (+ (/ 1 (* (pow cosTheta 4) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 3)))) (+ (/ alpha (* (pow cosTheta 2) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 2)))) (/ alpha (* (pow cosTheta 6) (* (log (pow alpha 2)) (pow (- (pow alpha 2) 1) 4)))))))) (pow cosTheta 2))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* (pow cosTheta 2) (* (log (pow alpha 2)) (- (pow alpha 2) 1)))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* (pow cosTheta 2) (+ (* (log (pow alpha 2)) (- (pow alpha 2) 1)) (/ (log (pow alpha 2)) (pow cosTheta 2))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow cosTheta 2) (- (pow alpha 2) 1))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ 1 (pow cosTheta 2)) (pow alpha 2)) 1))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (pow alpha 2) 1) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))) (/ (pow alpha 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))) (+ (/ (pow alpha 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (+ (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3))))) (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2)))))))) (pow cosTheta 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ (- (+ (/ 1 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))) (+ (/ 1 (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 4))))) (+ (/ (pow alpha 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (/ (pow alpha 2) (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3)))))))) (+ (/ 1 (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4)))))))) (+ (/ 1 (* (pow cosTheta 4) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 3))))) (+ (/ (pow alpha 2) (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 2))))) (/ (pow alpha 2) (* (pow cosTheta 6) (* (PI) (* (log (pow alpha 2)) (pow (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))) 4))))))))) (pow cosTheta 2))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow cosTheta 2) (+ (* (PI) (* (log (pow alpha 2)) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))) (/ (* (PI) (log (pow alpha 2))) (pow cosTheta 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4)))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow cosTheta 2) (- (+ (/ 1 (pow cosTheta 2)) (/ (pow alpha 6) (+ 1 (+ (pow alpha 2) (pow alpha 4))))) (/ 1 (+ 1 (+ (pow alpha 2) (pow alpha 4))))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (/ (- (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2)))) (* (log (pow (pow alpha 2) (PI))) (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2)))) (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2)) 2)))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (- (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2)))) (* (log (pow (pow alpha 2) (PI))) (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (* (log (pow (pow alpha 2) (PI))) (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2)))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (exp (* (log (pow (pow alpha 2) (PI))) (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (* (log (pow (pow alpha 2) (PI))) (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2)))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (- (+ 1 (* (pow alpha 2) (pow cosTheta 2))) (pow cosTheta 2)) 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))) (* 2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)))))))) (* -1 (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 3))))) (+ (* -2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (* (+ (* -2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))) (* 2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)))))) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))) (+ (* 4 (* (pow cosTheta 2) (* (PI) (* (log alpha) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2))))) (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (* (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))))))))) (+ (* -2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))))) (* 2 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (pow (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) 2)))))))) (* -1 (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* (pow alpha 2) (+ (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* (pow alpha 2) (+ (* 1/2 (/ 1 (* (PI) (log alpha)))) (+ (* (pow alpha 2) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))))))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* 4 (/ (pow alpha 6) (* (PI) (log alpha))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (+ (* -4 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 4 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* 4 (/ (pow alpha 4) (* (PI) (log alpha)))) (* 4 (/ 1 (* (PI) (log alpha)))))) (* 4 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* (pow alpha 4) (+ (* -4 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 4 (/ 1 (* (PI) (log alpha)))))) (* 4 (/ 1 (* (PI) (log alpha)))))) (* 4 (/ 1 (* (PI) (log alpha))))))))
#s(approx (pow alpha 6) #s(hole binary32 (pow alpha 6)))
#s(approx alpha #s(hole binary32 alpha))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* 1/4 (* (PI) (log alpha)))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* 1/4 (* (PI) (log alpha))) (* 1/4 (* (pow alpha 2) (* (PI) (log alpha)))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* 1/4 (* (PI) (log alpha))) (* (pow alpha 2) (+ (* 1/4 (* (PI) (log alpha))) (* 1/4 (* (pow alpha 2) (* (PI) (log alpha)))))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/4 (/ (log alpha) (pow (PI) 2)))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* 1/4 (/ (log alpha) (pow (PI) 2))) (* 1/4 (/ (* (pow alpha 2) (log alpha)) (pow (PI) 2))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* 1/4 (/ (log alpha) (pow (PI) 2))) (* (pow alpha 2) (+ (* 1/4 (/ (log alpha) (pow (PI) 2))) (* 1/4 (/ (* (pow alpha 2) (log alpha)) (pow (PI) 2))))))))
#s(approx (pow (log alpha) 3) #s(hole binary32 (pow (log alpha) 3)))
#s(approx (log alpha) #s(hole binary32 (log alpha)))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (/ 1/4 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (+ (* 1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* 1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (/ 1/4 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (+ (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (* (* (PI) (PI)) (pow (log alpha) 2)) #s(hole binary32 (* (pow (PI) 2) (pow (log alpha) 2))))
#s(approx (pow (log alpha) 2) #s(hole binary32 (pow (log alpha) 2)))
#s(approx (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (pow alpha 4) #s(hole binary32 (pow alpha 4)))
#s(approx (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (* alpha alpha) #s(hole binary32 (pow alpha 2)))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (+ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* (pow cosTheta 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))))) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* (pow alpha 2) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* (pow alpha 2) (+ (* (pow alpha 2) (- (* (pow cosTheta 2) (- (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (+ (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha)))))) (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* (pow alpha 2) (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha))))))) (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (* (pow cosTheta 2) (- (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha))))))) (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))))) (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 3 (/ (pow alpha 2) (* (PI) (log alpha)))) (* (pow cosTheta 2) (- (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))))) (* (pow cosTheta 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))))) (* (pow cosTheta 2) (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 3/2 (/ 1 (* (PI) (log alpha)))) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (- (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 2 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha)))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* -3 (/ (* (pow alpha 2) (pow cosTheta 2)) (* (PI) (log alpha)))) (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 2 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* -3 (/ (pow cosTheta 2) (* (PI) (log alpha)))) (* 21/2 (/ (pow alpha 2) (* (PI) (log alpha)))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (/ -1/2 (* (PI) (log alpha)))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* 2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* -3 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 28 (/ (pow alpha 6) (* (PI) (log alpha))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* -70 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 28 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* 54 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 70 (/ 1 (* (PI) (log alpha)))))) (* 28 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* 31/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 54 (/ 1 (* (PI) (log alpha)))))) (* 70 (/ 1 (* (PI) (log alpha)))))) (* 28 (/ 1 (* (PI) (log alpha))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* 7 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 6) (+ (* -21/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 7 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* 3 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 21/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 7 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 21/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 7 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (/ 7 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (+ (* -21/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 7 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 21/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 7 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 21/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 7 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ 2 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (+ (* -3 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (/ 2 (* (PI) (log alpha)))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (+ (* -3 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) #s(hole binary32 (* 3 (/ (pow alpha 2) (* (PI) (log alpha))))))
#s(approx (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha))))))
#s(approx (/ (* alpha alpha) (* (PI) (log alpha))) #s(hole binary32 (/ (pow alpha 2) (* (PI) (log alpha)))))
#s(approx (* (PI) (log alpha)) #s(hole binary32 (* (PI) (log alpha))))
#s(approx (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha))))))
#s(approx (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha))))))
#s(approx (* 2 (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (/ 2 (* (PI) (log alpha)))))
#s(approx (/ 1 (* (PI) (log alpha))) #s(hole binary32 (/ 1 (* (PI) (log alpha)))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (/ 13/2 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (+ (* -39/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 13/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 39/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 13/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 39/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 13/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (/ 5 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (+ (* -15/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 5 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 15/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 5 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (/ 5 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* -15/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 15/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 5 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* 3 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (/ 5 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (+ (* -9/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 9/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 5 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (/ 3/2 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (+ (* -9/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 9/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (/ 3/2 (* (PI) (log alpha)))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (+ (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* 3/2 (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (/ 3/2 (* (PI) (log alpha)))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (/ 1 (* (PI) (log alpha)))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))
#s(approx (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (/ 2 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (/ 4 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (+ (* -6 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 9/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 6 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 9/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 6 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (/ 5/2 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (+ (* -5/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (/ 5/2 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (+ (* -1 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (+ (* -1 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (/ 3/2 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (+ (* -9/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 9/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 3/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) #s(hole binary32 (/ 3/2 (* (pow (PI) 2) (log alpha)))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) #s(hole binary32 (+ (* -3/2 (/ (pow alpha 2) (* (pow (PI) 2) (log alpha)))) (* 3/2 (/ 1 (* (pow (PI) 2) (log alpha)))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) #s(hole binary32 (/ 1 (* (PI) (pow (log alpha) 2)))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) #s(hole binary32 (+ (* -1/2 (/ (pow alpha 2) (* (PI) (pow (log alpha) 2)))) (/ 1 (* (PI) (pow (log alpha) 2))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* -2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* 28 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3 (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ 4 (* (PI) (log alpha)))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* -4 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 4 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 4 (/ (pow alpha 4) (* (PI) (log alpha)))) (* 4 (/ 1 (* (PI) (log alpha)))))) (* 4 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 4) (+ (* -4 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 4 (/ 1 (* (PI) (log alpha)))))) (* 4 (/ 1 (* (PI) (log alpha)))))) (* 4 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (/ -9/2 (* (PI) (log alpha)))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* 3 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 9/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* 3 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3 (/ 1 (* (PI) (log alpha)))))) (* 9/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 23 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3 (/ 1 (* (PI) (log alpha)))))) (* 3 (/ 1 (* (PI) (log alpha)))))) (* 9/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (/ -2 (* (PI) (log alpha)))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* 3 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (+ (* 18 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* 2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (/ -1/8 (* (pow (PI) 5) (pow (log alpha) 5)))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (- (* -5/16 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 1/8 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* -5/16 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 5/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 1/8 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* 17/16 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 5/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 5/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 1/8 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) #s(hole binary32 (/ -1/8 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) #s(hole binary32 (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) #s(hole binary32 (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))) #s(hole binary32 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (* (pow (PI) 3) (pow (log alpha) 3)) #s(hole binary32 (* (pow (PI) 3) (pow (log alpha) 3))))
#s(approx (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) #s(hole binary32 (/ 1/8 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))) #s(hole binary32 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* 5/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* 5/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* -15/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (+ (* 5 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (+ (* (pow alpha 4) (+ (* -15/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (+ (* (pow alpha 4) (+ (* (pow alpha 2) (- (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 15/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 5 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* -5/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 2) (- (* 5/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* 5 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 2) (+ (* -5 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* 2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* (pow alpha 2) (+ (* -3 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (/ (* alpha alpha) (PI)) #s(hole binary32 (/ (pow alpha 2) (PI))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (/ 2 (* (PI) (pow (log alpha) 2)))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (+ (* -3 (/ (pow alpha 2) (* (PI) (pow (log alpha) 2)))) (* 2 (/ 1 (* (PI) (pow (log alpha) 2)))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* -3 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 2) (- (* 2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* 3 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* (pow alpha 2) (+ (* -3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (/ 3/2 (* (PI) (pow (log alpha) 2)))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (+ (* -3/2 (/ (pow alpha 2) (* (PI) (pow (log alpha) 2)))) (* 3/2 (/ 1 (* (PI) (pow (log alpha) 2)))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 2) (- (* 1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (/ (pow alpha 2) (* (PI) (log alpha)))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (/ 1/16 (* (pow (PI) 4) (pow (log alpha) 4)))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* 1/8 (/ (pow alpha 2) (* (pow (PI) 4) (pow (log alpha) 4)))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (log alpha) 4)))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* 3/16 (/ (pow alpha 2) (* (pow (PI) 4) (pow (log alpha) 4)))) (* 1/8 (/ 1 (* (pow (PI) 4) (pow (log alpha) 4)))))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (log alpha) 4)))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 1/8 (/ (pow alpha 2) (* (pow (PI) 4) (pow (log alpha) 4)))) (* 3/16 (/ 1 (* (pow (PI) 4) (pow (log alpha) 4)))))) (* 1/8 (/ 1 (* (pow (PI) 4) (pow (log alpha) 4)))))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (log alpha) 4)))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (/ -5/2 (* (PI) (log alpha)))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (- (* 4 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 5/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* 5 (/ (pow alpha 4) (* (PI) (log alpha)))) (* 4 (/ 1 (* (PI) (log alpha)))))) (* 5/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* (pow alpha 4) (+ (* -26 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 5 (/ 1 (* (PI) (log alpha)))))) (* 4 (/ 1 (* (PI) (log alpha)))))) (* 5/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (/ -5/8 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (- (* 3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 5/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* 3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 5/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 9/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 5/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (/ 1/2 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* 3/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* 3/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (/ 1/2 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (+ (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))) (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (+ (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (/ (pow alpha 4) (* (PI) (log alpha)))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* -3/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 2) (- (* 1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (/ -1/2 (* (PI) (log alpha)))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 21/2 (/ (pow alpha 6) (* (PI) (log alpha))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* -21 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 21/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* 12 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 21 (/ 1 (* (PI) (log alpha)))))) (* 21/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* 9 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 12 (/ 1 (* (PI) (log alpha)))))) (* 21 (/ 1 (* (PI) (log alpha)))))) (* 21/2 (/ 1 (* (PI) (log alpha))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* 21/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 6) (+ (* -21/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 21/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* 3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 21/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 21/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (/ 21/8 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (+ (* -21/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 21/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 21/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 21/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (/ 3/8 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (+ (* -3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ 3/2 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (+ (* -3/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (/ 9/4 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (+ (* -9/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 9/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 9/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 9/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (/ 5/2 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (+ (* -5/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 5/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 1/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 5/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 5/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (+ (* -1 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 1/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* -3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* 21/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (/ -5/2 (* (PI) (log alpha)))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 5/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 5/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 3/2 (/ 1 (* (PI) (log alpha)))) (* (pow alpha 2) (- (* 21 (/ 1 (* (PI) (log alpha)))) (* 27/2 (/ 1 (* (PI) (log alpha)))))))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 5/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (/ -5/128 (* (pow (PI) 7) (pow (log alpha) 7)))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (- (* -3/32 (/ (pow alpha 2) (* (pow (PI) 7) (pow (log alpha) 7)))) (* 5/128 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* -9/64 (/ (pow alpha 2) (* (pow (PI) 7) (pow (log alpha) 7)))) (* 3/32 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))) (* 5/128 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* 11/128 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))) (* 1/32 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))) (* 9/64 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))) (* 3/32 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))) (* 5/128 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (/ -3/32 (* (pow (PI) 5) (pow (log alpha) 5)))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* -3/16 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 3/32 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* -3/16 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 3/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 3/32 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* 13/32 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 3/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 3/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 3/32 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (/ 3/4 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (+ (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* -5/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (/ 3/4 (* (pow (PI) 2) (pow (log alpha) 2)))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (+ (* 5/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (+ (* (pow alpha 4) (+ (* -5/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (+ (* (pow alpha 4) (+ (* (pow alpha 2) (- (* 1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* 5/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* (pow alpha 4) (+ (* -5/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow alpha 2) (- (* 1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 2) (- (/ (pow alpha 2) (* (pow (PI) 2) (pow (log alpha) 2))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log alpha) 2))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (/ -1/64 (* (pow (PI) 7) (pow (log alpha) 7)))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (- (* -3/128 (/ (pow alpha 2) (* (pow (PI) 7) (pow (log alpha) 7)))) (* 1/64 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* -3/128 (/ (pow alpha 2) (* (pow (PI) 7) (pow (log alpha) 7)))) (* 3/128 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))) (* 1/64 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* 5/64 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))) (* 1/32 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))) (* 3/128 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))) (* 3/128 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))) (* 1/64 (/ 1 (* (pow (PI) 7) (pow (log alpha) 7)))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (/ -1/4 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* 1/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* 1/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) (* 5/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (/ -1/2 (* (PI) (log alpha)))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (/ (pow alpha 2) (* (PI) (log alpha))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 3 (/ (pow alpha 6) (* (PI) (log alpha))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* -9/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 9/2 (/ 1 (* (PI) (log alpha)))))) (* 3 (/ 1 (* (PI) (log alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* 3 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 3/2 (/ 1 (* (PI) (log alpha)))))) (* 9/2 (/ 1 (* (PI) (log alpha)))))) (* 3 (/ 1 (* (PI) (log alpha))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 3/4 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (+ (* -3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (/ 3/4 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (+ (* -3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/4 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (+ (* -1/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (/ 1/2 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (+ (* -1/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* -1 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 2) (+ (* 3 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (/ -1 (* (PI) (log alpha)))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* 1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (- (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 3/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (/ 1 (* (PI) (log alpha))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ -1/16 (* (pow (PI) 5) (pow (log alpha) 5)))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (- (* -3/32 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 1/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* -3/32 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 3/32 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 1/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (- (* (pow alpha 2) (- (* (pow alpha 2) (- (* 1/8 (/ (pow alpha 2) (* (pow (PI) 5) (pow (log alpha) 5)))) (* 3/32 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 3/32 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))) (* 1/16 (/ 1 (* (pow (PI) 5) (pow (log alpha) 5)))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (/ 1/64 (* (pow (PI) 6) (pow (log alpha) 6)))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* 3/64 (/ (pow alpha 2) (* (pow (PI) 6) (pow (log alpha) 6)))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (log alpha) 6)))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* 3/32 (/ (pow alpha 2) (* (pow (PI) 6) (pow (log alpha) 6)))) (* 3/64 (/ 1 (* (pow (PI) 6) (pow (log alpha) 6)))))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (log alpha) 6)))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (+ (* (pow alpha 2) (+ (* (pow alpha 2) (+ (* 3/32 (/ 1 (* (pow (PI) 6) (pow (log alpha) 6)))) (* 7/64 (/ (pow alpha 2) (* (pow (PI) 6) (pow (log alpha) 6)))))) (* 3/64 (/ 1 (* (pow (PI) 6) (pow (log alpha) 6)))))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (log alpha) 6)))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (/ -3/8 (* (pow (PI) 3) (pow (log alpha) 3)))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* 3/8 (/ (pow alpha 4) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* (pow alpha 4) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) (* 2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (- (* (pow alpha 4) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) (* (pow alpha 2) (+ (* -27/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 2 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ 1/2 (* (PI) (log alpha)))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* 1/2 (/ (pow alpha 4) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (+ (* (pow alpha 2) (- (* (pow alpha 4) (+ (* -1/2 (/ (pow alpha 2) (* (PI) (log alpha)))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))) (* 1/2 (/ 1 (* (PI) (log alpha)))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (/ (* (pow alpha 2) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (+ 1 (* -1 (pow cosTheta 2))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (/ (* (pow alpha 2) (* (pow cosTheta 4) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (+ alpha 1) (PI)) #s(hole binary32 (/ 1 (PI))))
#s(approx (/ (+ alpha 1) (PI)) #s(hole binary32 (+ (/ 1 (PI)) (/ alpha (PI)))))
#s(approx (+ alpha 1) #s(hole binary32 1))
#s(approx (+ alpha 1) #s(hole binary32 (+ 1 alpha)))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ -1/2 (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* 1/2 (/ alpha (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 1/2 (/ 1 (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* alpha (+ (* 1/2 (/ (* alpha (pow cosTheta 2)) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* 1/2 (/ 1 (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* 1/2 (/ 1 (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (- (* alpha (+ (* alpha (- (* -1/2 (/ (* alpha (pow cosTheta 2)) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* -1/2 (/ (pow cosTheta 2) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))) (* 1/2 (/ 1 (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* 1/2 (/ 1 (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (- alpha 1) #s(hole binary32 -1))
#s(approx (- alpha 1) #s(hole binary32 (- alpha 1)))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* 2 (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (+ (* 2 (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (log alpha)))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* 2 (log alpha))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2))))))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 -1))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (- (pow alpha 2) 1)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* -1 (* (pow alpha 2) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1 (/ (* (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))) (+ (* -1 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2)))))) (+ 1 (* -1 (pow cosTheta 2))))) (* -1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))))) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* -2 (* (pow alpha 2) (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* -2 (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))))) (* 2 (* (pow alpha 2) (* (PI) (* (log alpha) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))))))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* 2 (* (PI) (log alpha)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (* -1 (pow cosTheta 2)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (+ 1 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* -1 (pow cosTheta 2))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (pow cosTheta 2)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2)))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (+ (* -1 (pow cosTheta 2)) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2))) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (* -1 (pow cosTheta 2)))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* -1 cosTheta)))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) cosTheta))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) (- (* -1 (* (pow alpha 2) (+ cosTheta (* -1 cosTheta)))) (* -1 cosTheta))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (+ (* -1 cosTheta) (* (pow alpha 2) (- (* (pow alpha 2) (- (* (pow alpha 2) (+ cosTheta (* -1 cosTheta))) (+ cosTheta (* -1 cosTheta)))) (* -1 cosTheta))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 -1))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (- (pow alpha 2) 1)))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 -1))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (- (pow alpha 6) 1)))
#s(approx (pow (* alpha alpha) 3) #s(hole binary32 (pow alpha 6)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 1))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (+ 1 (pow alpha 2))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (+ 1 (* (pow alpha 2) (+ 1 (pow alpha 2))))))
#s(approx (+ 1 (* alpha alpha)) #s(hole binary32 1))
#s(approx (+ 1 (* alpha alpha)) #s(hole binary32 (+ 1 (pow alpha 2))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (/ -1/2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (- (* (pow alpha 2) (- (* 1/4 (/ (- (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* -1 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/4 (/ (- (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (- (* 1/4 (/ (- (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (+ (* -1/8 (/ (+ (* 1/6 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 2 (/ (* (pow cosTheta 2) (- (* 1/4 (/ (- (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* -1 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))))) (* -1 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 1/4 (/ (- (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (- (+ (* 1/4 (/ (- (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (- (* 1/4 (/ (- (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/720 (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (+ (* -1/8 (/ (+ (* 1/180 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))))) (* 1/6 (* (pow cosTheta 2) (* (PI) (* (log alpha) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))))))))) (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (+ (* 1/4 (/ (* (+ (* 1/6 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (- (* 1/4 (/ (- (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* -1 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 2 (/ (* (pow cosTheta 2) (- (* 1/4 (/ (- (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (+ (* -1/8 (/ (+ (* 1/6 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 2 (/ (* (pow cosTheta 2) (- (* 1/4 (/ (- (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* -1 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2)))))))) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ (* -1/8 (/ (+ (* 1/6 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))) (* (pow (PI) 3) (* (pow (log alpha) 3) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 2 (/ (* (pow cosTheta 2) (- (* 1/4 (/ (- (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))) (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* -1 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (+ 1 (* -1 (pow cosTheta 2))))))))) (* -1 (/ (pow cosTheta 2) (* (PI) (* (log alpha) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* 1/2 (/ 1 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (* -2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (- (* (pow alpha 2) (- (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (- (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (- (* (pow alpha 2) (- (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (- (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (- (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))))) (* 1/720 (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))) (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* 2 (* (pow alpha 2) (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* (pow alpha 2) (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* (pow alpha 2) (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 1/24 (* (pow alpha 2) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha))))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* (pow alpha 2) (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 1/720 (* (pow alpha 2) (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 1/24 (* (pow alpha 2) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 1/720 (* (pow alpha 2) (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (+ (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (* (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (log alpha)))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (+ (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (+ (* 2 (* (pow alpha 2) (* (pow cosTheta 4) (* (pow (PI) 2) (* (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (pow (log alpha) 2)))))) (* 2 (* (pow cosTheta 2) (* (PI) (* (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (log alpha))))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (+ (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (* (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (log alpha))))) (* (pow alpha 2) (+ (* 4/3 (* (pow alpha 2) (* (pow cosTheta 6) (* (pow (PI) 3) (* (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (pow (log alpha) 3)))))) (* 2 (* (pow cosTheta 4) (* (pow (PI) 2) (* (exp (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))) (pow (log alpha) 2))))))))))))
#s(approx (pow (* alpha alpha) (PI)) #s(hole binary32 (exp (* 2 (* (PI) (log alpha))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* 2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log alpha))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 1/24 (* (pow alpha 2) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))) (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (+ (* 2 (* (PI) (* (log alpha) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 2) (+ (* 2 (* (pow cosTheta 2) (* (PI) (log alpha)))) (* (pow alpha 2) (+ (* 1/720 (* (pow alpha 2) (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))) (* 1/24 (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* 8 (* (pow alpha 2) (* (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log alpha) 2) (+ 1 (* -1 (pow cosTheta 2)))))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow alpha 2) (+ (* 8 (* (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log alpha) 2) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (+ (* 1/6 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (* 4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (+ (* 4 (* (pow (PI) 2) (* (pow (log alpha) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow alpha 2) (+ (* 8 (* (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log alpha) 2) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 2) (+ (* 1/6 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2))))))))) (+ (* 4 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* (pow alpha 2) (+ (* 1/180 (* (PI) (* (log alpha) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* -2880 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (+ (* 960 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1920 (* (pow cosTheta 6) (* (pow (PI) 3) (pow (log alpha) 3)))))))))) (* 1/6 (* (pow cosTheta 2) (* (PI) (* (log alpha) (+ (* -48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))) (* 48 (* (pow cosTheta 4) (* (pow (PI) 2) (pow (log alpha) 2)))))))))))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (/ (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (+ 1 (* -1 (pow cosTheta 2))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))))) (* -2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) (pow alpha 2)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2)))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 4) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)))))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (* -2 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* -2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) (pow alpha 2))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (+ 1 (* -1 (pow cosTheta 2)))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow alpha 4) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))))))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (* -2 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow cosTheta 2) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (+ 1 (* -1 (pow cosTheta 2)))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (* -2 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))) (pow cosTheta 2))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))))) (* (pow alpha 6) (pow cosTheta 2)))) (+ (* -2 (/ (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) (pow alpha 2))) (+ (* 1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* 1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 3))))) (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (log (/ 1 alpha)) 2) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow alpha 6) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))))) (+ (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))))) (* (pow alpha 4) (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (* (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (* -1 (/ (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2))) (* -2 (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))))) (- (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2))))))))) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))))))) (* (pow alpha 6) (* (pow cosTheta 4) (pow (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (* (log (/ 1 alpha)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))))) (* 1/2 (/ 1 (* (PI) (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))))))) 2)))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))) (/ (* (pow cosTheta 2) (- (+ (* 7/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 9/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2))) (/ 1/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (/ (* (pow cosTheta 2) (- (+ (* 3 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 9 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 17/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 5/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 4)) (/ (* (pow cosTheta 2) (- (+ (* 7/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 9/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2))))) (/ 1/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 4) (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))) (/ (* (pow cosTheta 2) (- (+ (* 7/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 9/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2))) (/ 1/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (/ (* (pow cosTheta 2) (- (+ (* 3 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 9 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 17/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 5/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 4)) (/ (* (pow cosTheta 2) (- (+ (* 7/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 9/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2))))) (/ 1/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (/ (* (pow cosTheta 2) (- (+ (* 3 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 9 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 17/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 5/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 4)) (/ (* (pow cosTheta 2) (- (+ (* 7/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 9/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2))))) (+ (/ 1/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (* 1/2 (/ 1 (* (pow alpha 8) (* (PI) (log (/ 1 alpha)))))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* -4 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 2) (- (* 4 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 4 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 2) (- (/ 4 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (+ (* 4 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 4 (* (pow alpha 6) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 2) (- (+ (* 4 (/ 1 (* (pow alpha 8) (* (PI) (log (/ 1 alpha)))))) (/ 4 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (* 4 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 4 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -1/4 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (+ (* -1/4 (* (PI) (log (/ 1 alpha)))) (* -1/4 (/ (* (PI) (log (/ 1 alpha))) (pow alpha 2)))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (+ (* -1/4 (* (PI) (log (/ 1 alpha)))) (+ (* -1/4 (/ (* (PI) (log (/ 1 alpha))) (pow alpha 2))) (* -1/4 (/ (* (PI) (log (/ 1 alpha))) (pow alpha 4))))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* -1/4 (/ (* (pow alpha 4) (log (/ 1 alpha))) (pow (PI) 2)))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (+ (* -1/4 (/ (log (/ 1 alpha)) (* (pow alpha 2) (pow (PI) 2)))) (* -1/4 (/ (log (/ 1 alpha)) (pow (PI) 2)))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (+ (* -1/4 (/ (log (/ 1 alpha)) (* (pow alpha 2) (pow (PI) 2)))) (+ (* -1/4 (/ (log (/ 1 alpha)) (* (pow alpha 4) (pow (PI) 2)))) (* -1/4 (/ (log (/ 1 alpha)) (pow (PI) 2))))))))
#s(approx (pow (log alpha) 3) #s(hole binary32 (* -1 (pow (log (/ 1 alpha)) 3))))
#s(approx (log alpha) #s(hole binary32 (* -1 (log (/ 1 alpha)))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (+ (* 1/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (+ (/ 1/4 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (+ (/ 1/4 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (+ (* 1/4 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))
#s(approx (* (* (PI) (PI)) (pow (log alpha) 2)) #s(hole binary32 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))
#s(approx (pow (log alpha) 2) #s(hole binary32 (pow (log (/ 1 alpha)) 2)))
#s(approx (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))
#s(approx (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 4) (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))) (/ (* (pow cosTheta 2) (- (+ (* 7/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 9/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha)))))) (+ (/ (* (pow cosTheta 2) (- (+ (* 3 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 9 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 17/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 5/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 4)) (/ (* (pow cosTheta 2) (- (+ (* 7/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (* 9/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2)))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))) (/ 1 (* (PI) (log (/ 1 alpha))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (+ (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (+ (/ 7/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (/ (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2))))) (+ (/ 1 (* (PI) (log (/ 1 alpha)))) (/ 9/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (+ (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (/ 7/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (+ (/ (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2)) (/ (* (pow cosTheta 2) (- (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 9 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 17/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 4))))))) (+ (/ 1 (* (PI) (log (/ 1 alpha)))) (/ 9/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (+ (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (/ (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2)))) (/ 9/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (+ (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (+ (* 3 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (/ (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2)) (/ (* (pow cosTheta 2) (- (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 9 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 17/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 4)))))) (/ 9/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (+ (* (pow cosTheta 2) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (+ (* 3 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (* 3/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (+ (/ (* (pow cosTheta 2) (- (+ (* -2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 2)) (/ (* (pow cosTheta 2) (- (+ (* 1/2 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 9 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 17/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 4))))))) (/ 9/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* 12 (/ 1 (* (PI) (log (/ 1 alpha)))))) (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (+ (* 12 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 39/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))) (+ (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 21 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (* 1/2 (/ (pow cosTheta 2) (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (* 3 (/ (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (+ (* 12 (/ 1 (* (PI) (log (/ 1 alpha))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (/ 39/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))) (+ (* 21/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 21 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -3/2 (/ (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (/ 12 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* -2 (/ (pow cosTheta 2) (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (* 3 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (/ 12 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))) (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 21 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* -2 (/ (pow cosTheta 2) (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (+ (* 1/2 (/ (pow cosTheta 2) (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (+ (* 3 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (/ 9 (* (pow alpha 6) (* (PI) (log (/ 1 alpha))))) (/ 12 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))) (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 21 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* 3 (/ (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 3 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1/2 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))) (* 3 (/ 1 (* (PI) (log (/ 1 alpha)))))) (/ 2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/2 (/ (pow alpha 8) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 25/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 54 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (/ 25/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 54 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 139/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (/ 25/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* 1/8 (/ (pow alpha 12) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 12) (- (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 21/2 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 21/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (+ (* 7 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (* (pow alpha 6) (- (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 21/2 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 21/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (+ (* 7 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* 3 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* (pow alpha 2) (- (* 3 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* 3 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 2) (- (* 3 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) #s(hole binary32 (* -3 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (* alpha alpha) (* (PI) (log alpha))) #s(hole binary32 (* -1 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (* (PI) (log alpha)) #s(hole binary32 (* -1 (* (PI) (log (/ 1 alpha))))))
#s(approx (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) #s(hole binary32 (* 1/2 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (* 2 (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (/ -2 (* (PI) (log (/ 1 alpha))))))
#s(approx (/ 1 (* (PI) (log alpha))) #s(hole binary32 (/ -1 (* (PI) (log (/ 1 alpha))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (* (pow alpha 6) (- (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 39/4 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 39/4 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (+ (* 13/2 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (* -3/2 (/ (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 15/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 3/2 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (/ 15/2 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (+ (* 3/2 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 5 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 3/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 15/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 5 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* 3 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* 3/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 9/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 5 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 9/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* 3/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 3/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 2) (- (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (* 3/2 (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (/ -3/2 (* (PI) (log (/ 1 alpha))))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (* 1/2 (/ (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 2) (- (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (/ 2 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 6 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 6 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (+ (* 4 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (* -3/4 (/ (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 3/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 3/2 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (log (/ 1 alpha)))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) #s(hole binary32 (* (pow alpha 2) (- (* 3/2 (/ 1 (* (pow (PI) 2) (log (/ 1 alpha))))) (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (log (/ 1 alpha))))))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (PI) (pow (log (/ 1 alpha)) 2))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) #s(hole binary32 (* (pow alpha 2) (- (/ 1 (* (pow alpha 2) (* (PI) (pow (log (/ 1 alpha)) 2)))) (* 1/2 (/ 1 (* (PI) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* 1/2 (/ (pow alpha 8) (* (PI) (log (/ 1 alpha)))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 25/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 51 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (/ 25/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 51 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 135/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (/ 25/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ -4 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (* 4 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 4 (/ 1 (* (PI) (log (/ 1 alpha)))))) (pow alpha 4))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (/ 4 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (+ (* 4 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 4 (* (pow alpha 6) (* (PI) (log (/ 1 alpha))))))) (pow alpha 4))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (+ (* 4 (/ 1 (* (pow alpha 8) (* (PI) (log (/ 1 alpha)))))) (/ 4 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (* 4 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 4 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))) (pow alpha 4))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* 1/2 (/ (pow alpha 8) (* (PI) (log (/ 1 alpha)))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 25/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 51 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (/ 25/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 51 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 135/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (/ 25/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -3 (/ (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (* 21 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 3 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (/ 21 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (+ (* 3 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 38 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 17 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (/ 21 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (* 3 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 38 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* -3/16 (/ (pow alpha 14) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 14) (- (* 15/16 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))) (* 3/16 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 14) (- (/ 15/16 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (+ (/ 5/16 (* (pow alpha 4) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (* 3/16 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 14) (- (+ (* -1 (/ (+ (* 5/16 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (* 1/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))))) (pow alpha 4))) (/ 15/16 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))) (* 3/16 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) #s(hole binary32 (* -1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) #s(hole binary32 (* (pow alpha 6) (- (* 1/8 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) #s(hole binary32 (* -1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))) #s(hole binary32 (* -1 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* (pow (PI) 3) (pow (log alpha) 3)) #s(hole binary32 (* -1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))
#s(approx (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) #s(hole binary32 (/ -1/8 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))
#s(approx (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))) #s(hole binary32 (/ -1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* 3/2 (/ (pow alpha 8) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 8) (- (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 15/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 5/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (+ (* 5/2 (/ 1 (* (pow alpha 6) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* 3/2 (/ (pow alpha 8) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 8) (- (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 15/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 5 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 5 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (+ (/ 1 (* (pow alpha 8) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* 5/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 5/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* -5 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 5 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 5 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* -3 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 3 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (* -3 (/ (pow alpha 2) (* (PI) (pow (log (/ 1 alpha)) 2))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (* (pow alpha 2) (- (* 2 (/ 1 (* (pow alpha 2) (* (PI) (pow (log (/ 1 alpha)) 2))))) (* 3 (/ 1 (* (PI) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* 2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (* 2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* -3/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (PI) (pow (log (/ 1 alpha)) 2))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (* (pow alpha 2) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (pow (log (/ 1 alpha)) 2))))) (* 3/2 (/ 1 (* (PI) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* -1/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* -1/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* 1/2 (/ (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/16 (/ (pow alpha 8) (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (+ (* 1/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4))))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4))))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (+ (/ 1/8 (* (pow alpha 2) (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4)))) (+ (/ 3/16 (* (pow alpha 4) (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4)))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4)))))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (+ (/ 1/8 (* (pow alpha 2) (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4)))) (+ (* 3/16 (/ 1 (* (pow alpha 4) (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4))))) (+ (* 1/8 (/ 1 (* (pow alpha 6) (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4))))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (log (/ 1 alpha)) 4))))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/2 (/ (pow alpha 8) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 19/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 30 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (/ 19/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 30 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 59/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (/ 19/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* 1/8 (/ (pow alpha 12) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 12) (- (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 21/4 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 21/4 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (+ (* 9/4 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -1/2 (/ (pow alpha 6) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (* 3/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (/ 3/4 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 3/4 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (/ 3/4 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (+ (* 3/4 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/2 (/ 1 (* (pow alpha 6) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* -1/2 (/ (pow alpha 6) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (+ (/ 1/2 (* (pow alpha 6) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* -1/2 (/ (pow alpha 6) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 6) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* 1/2 (/ (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 6) (- (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 3/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* 3/2 (/ (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1/2 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))) (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (/ 3/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* -3/2 (/ (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (- (* 12 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (- (/ 12 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 21 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 9 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (/ 12 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 21 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* -3/8 (/ (pow alpha 10) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 10) (- (* 21/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 10) (- (/ 21/8 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 21/8 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (* -3/8 (/ (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (* 21/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (/ 21/8 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 21/8 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* 3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 2) (- (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 3/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* (pow alpha 2) (- (* 3/2 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* -3/8 (/ (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 4) (- (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 4) (- (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 9/4 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* -1/4 (/ (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (/ 5/2 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (+ (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* -1/4 (/ (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (+ (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* -3/2 (/ (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (- (* 21/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (- (/ 21/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 39/2 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 17/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))) (/ 21/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -3/2 (/ (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (* 21/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (/ 21/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 39/2 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (/ 17/2 (* (pow alpha 6) (* (PI) (log (/ 1 alpha))))) (/ 21/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 39/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* -3/128 (/ (pow alpha 18) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 18) (- (* 3/32 (/ 1 (* (pow alpha 2) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))) (* 3/128 (/ 1 (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 18) (- (+ (/ 3/64 (* (pow alpha 4) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7)))) (/ 3/32 (* (pow alpha 2) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))) (* 3/128 (/ 1 (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 18) (- (+ (/ 3/32 (* (pow alpha 2) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7)))) (+ (* 3/64 (/ 1 (* (pow alpha 4) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))) (* 5/128 (/ 1 (* (pow alpha 6) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))) (* 3/128 (/ 1 (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* -1/32 (/ (pow alpha 14) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 14) (- (* 5/16 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))) (* 1/32 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 14) (- (/ 5/16 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (+ (/ 3/16 (* (pow alpha 4) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (* 1/32 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 14) (- (+ (* -1 (/ (+ (* 3/16 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (* 5/32 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))))) (pow alpha 4))) (/ 5/16 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))) (* 1/32 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 8) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 3/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 3/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (+ (* 3/2 (/ 1 (* (pow alpha 6) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 8) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 5/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (+ (* 3/4 (/ 1 (* (pow alpha 8) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 8) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (pow alpha 4) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2))) (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (log (/ 1 alpha)) 2)))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* -1/64 (/ (pow alpha 18) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 18) (- (* 3/128 (/ 1 (* (pow alpha 2) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))) (* 1/64 (/ 1 (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 18) (- (+ (/ 3/128 (* (pow alpha 2) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7)))) (/ 3/128 (* (pow alpha 4) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))) (* 1/64 (/ 1 (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 18) (- (+ (/ 3/128 (* (pow alpha 2) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7)))) (+ (* 3/128 (/ 1 (* (pow alpha 4) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))) (* 3/64 (/ 1 (* (pow alpha 6) (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))) (* 1/64 (/ 1 (* (pow (PI) 7) (pow (log (/ 1 alpha)) 7))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* -1/4 (/ (pow alpha 10) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 10) (- (* 7/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 10) (- (/ 7/8 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (+ (/ 5/8 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 10) (- (+ (* -1 (/ (+ (* 5/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 1/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))) (pow alpha 4))) (/ 7/8 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* 1/2 (/ (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1/2 (* (pow alpha 4) (* (PI) (log (/ 1 alpha))))) (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 3/2 (/ (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 9/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (/ 3 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (/ 9/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (+ (* 3 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (* 3/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))) (/ 9/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 3/8 (/ (pow alpha 8) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 3/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* 3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 2) (- (* 3/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 3/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* 1/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* (pow alpha 2) (- (* 1/2 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* 1/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 2) (- (* 1/4 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 1/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (pow alpha 4) (* (PI) (log (/ 1 alpha))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (PI) (log (/ 1 alpha)))) (* 7/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1 (* (PI) (log (/ 1 alpha)))) (/ 5/2 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (/ 7/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1 (* (PI) (log (/ 1 alpha)))) (+ (* 5/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (* 3/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))) (/ 7/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (/ (pow alpha 4) (* (PI) (log (/ 1 alpha))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (PI) (log (/ 1 alpha)))) (* 7/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1 (* (PI) (log (/ 1 alpha)))) (/ 5/2 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (/ 7/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1 (* (PI) (log (/ 1 alpha)))) (+ (* 5/2 (/ 1 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))) (* 3/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))) (/ 7/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* 1/16 (/ (pow alpha 12) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 12) (- (* 1/16 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (* 3/32 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 12) (+ (* -1 (/ (+ (* 3/32 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (* 3/32 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))))) (pow alpha 2))) (* 1/16 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* -1 (/ (+ (* 3/32 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))) (* 1/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5)))))) (pow alpha 4))) (* 1/16 (/ 1 (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))) (/ 3/32 (* (pow alpha 2) (* (pow (PI) 5) (pow (log (/ 1 alpha)) 5))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/64 (/ (pow alpha 12) (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 12) (+ (* 3/64 (/ 1 (* (pow alpha 2) (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6))))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 12) (+ (/ 3/64 (* (pow alpha 2) (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6)))) (+ (/ 3/32 (* (pow alpha 4) (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6)))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6)))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 12) (+ (/ 3/64 (* (pow alpha 2) (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6)))) (+ (* 3/32 (/ 1 (* (pow alpha 4) (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6))))) (+ (* 7/64 (/ 1 (* (pow alpha 6) (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6))))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (log (/ 1 alpha)) 6))))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* 1/8 (/ (pow alpha 12) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 12) (- (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))) (/ 27/8 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 3/2 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 27/8 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (+ (* 2 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3))))) (/ 3/2 (* (pow alpha 2) (* (pow (PI) 3) (pow (log (/ 1 alpha)) 3)))))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ -1/2 (* (pow alpha 4) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (* 1/2 (/ 1 (* (pow alpha 2) (* (PI) (log (/ 1 alpha)))))) (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha)))))) (pow alpha 4))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (/ 1/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (+ (/ 1/2 (* (pow alpha 6) (* (PI) (log (/ 1 alpha))))) (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))))) (pow alpha 4))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (+ (/ 1/2 (* (pow alpha 2) (* (PI) (log (/ 1 alpha))))) (* 1/2 (/ 1 (* (pow alpha 8) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (PI) (log (/ 1 alpha))))) (* 1/2 (/ 1 (* (pow alpha 6) (* (PI) (log (/ 1 alpha)))))))) (pow alpha 4))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (+ alpha 1) (PI)) #s(hole binary32 (/ alpha (PI))))
#s(approx (/ (+ alpha 1) (PI)) #s(hole binary32 (* alpha (+ (/ 1 (PI)) (/ 1 (* alpha (PI)))))))
#s(approx (+ alpha 1) #s(hole binary32 alpha))
#s(approx (+ alpha 1) #s(hole binary32 (* alpha (+ 1 (/ 1 alpha)))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ -1/2 (* alpha (* (pow cosTheta 2) (log (/ 1 alpha)))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (* 1/2 (/ 1 (* alpha (* (pow cosTheta 2) (log (/ 1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (log (/ 1 alpha)))))) alpha)))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (log (/ 1 alpha)))))) (/ 1/2 (* alpha (* (pow cosTheta 2) (log (/ 1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (log (/ 1 alpha)))))) alpha)))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ (- (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 3) (* (pow cosTheta 4) (log (/ 1 alpha)))))) (/ 1/2 (* alpha (* (pow cosTheta 2) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (log (/ 1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (log (/ 1 alpha))))))) alpha)))
#s(approx (- alpha 1) #s(hole binary32 alpha))
#s(approx (- alpha 1) #s(hole binary32 (* alpha (- 1 (/ 1 alpha)))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (log (/ 1 alpha)))))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (log (/ 1 alpha)))) (* -2 (/ (* (log (/ 1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))) (pow alpha 2)))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* -2 (log (/ 1 alpha)))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (+ (/ 1 (pow alpha 2)) (pow cosTheta 2))))))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (pow alpha 2)))
#s(approx (- (* alpha alpha) 1) #s(hole binary32 (* (pow alpha 2) (- 1 (/ 1 (pow alpha 2))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow cosTheta 2))) (pow alpha 4))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* -1 (/ (* (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow cosTheta 2))) (+ (* -1 (/ (* (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow cosTheta 2))) (- 1 (pow cosTheta 2))) (pow cosTheta 2))) (* -1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (pow alpha 6))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow alpha 4) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ 1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ 1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 6))) (+ (* -2 (/ (* (PI) (* (log (/ 1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ 1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4)))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* -2 (* (PI) (log (/ 1 alpha))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (/ 1 (pow alpha 2)) (pow cosTheta 2)) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (pow alpha 4))) (+ (/ 1 (pow alpha 2)) (pow cosTheta 2))) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (pow cosTheta 2) (pow alpha 6))) (+ (/ 1 (pow alpha 2)) (+ (/ (pow cosTheta 2) (pow alpha 6)) (pow cosTheta 2)))) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 4))) (+ (/ (pow cosTheta 2) (pow alpha 2)) (/ (pow cosTheta 2) (pow alpha 4))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (pow cosTheta 2))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 2))) (pow cosTheta 2)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (pow alpha 4))) (pow cosTheta 2)) (/ (pow cosTheta 2) (pow alpha 2))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ (* -1 (/ (pow cosTheta 2) (pow alpha 6))) (+ (/ (pow cosTheta 2) (pow alpha 6)) (pow cosTheta 2))) (+ (* -1 (/ (pow cosTheta 2) (pow alpha 4))) (+ (/ (pow cosTheta 2) (pow alpha 2)) (/ (pow cosTheta 2) (pow alpha 4))))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) cosTheta)))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (+ cosTheta (* -1 (/ cosTheta (pow alpha 2)))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ cosTheta (* -1 (/ (+ cosTheta (* -1 cosTheta)) (pow alpha 4)))) (/ cosTheta (pow alpha 2))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) #s(hole binary32 (* (pow alpha 2) (- (+ cosTheta (+ (* -1 (/ cosTheta (pow alpha 6))) (/ cosTheta (pow alpha 6)))) (+ (* -1 (/ cosTheta (pow alpha 4))) (+ (/ cosTheta (pow alpha 2)) (/ cosTheta (pow alpha 4))))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (pow alpha 2)))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(hole binary32 (* (pow alpha 2) (- 1 (/ 1 (pow alpha 2))))))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (pow alpha 6)))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(hole binary32 (* (pow alpha 6) (- 1 (/ 1 (pow alpha 6))))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (pow alpha 4)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (* (pow alpha 4) (+ 1 (/ 1 (pow alpha 2))))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(hole binary32 (* (pow alpha 4) (+ 1 (+ (/ 1 (pow alpha 2)) (/ 1 (pow alpha 4)))))))
#s(approx (+ 1 (* alpha alpha)) #s(hole binary32 (pow alpha 2)))
#s(approx (+ 1 (* alpha alpha)) #s(hole binary32 (* (pow alpha 2) (+ 1 (/ 1 (pow alpha 2))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (/ (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) #s(hole binary32 (* (pow alpha 2) (- (/ 1 (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1))))) (/ 1 (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1))))))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) #s(hole binary32 (* (pow alpha 2) (+ (* -1 (/ (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))) (pow alpha 2))) (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* (pow alpha 2) (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (exp (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1)))))))
#s(approx (pow (* alpha alpha) (PI)) #s(hole binary32 (exp (* -2 (* (PI) (log (/ 1 alpha)))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) #s(hole binary32 (* (log (pow (pow alpha 2) (PI))) (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (* (pow (log (pow (pow alpha 2) (PI))) 2) (pow (+ 1 (* (pow cosTheta 2) (- (pow alpha 2) 1))) 2))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))) (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* -1 (/ (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ 1 (* -1 (pow cosTheta 2)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))))) (* 2 (/ (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 4) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (* 2 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))) (* 2 (/ (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ 1 (* -1 (pow cosTheta 2))))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow alpha 4) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))) (+ (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow alpha 2) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow alpha 6) (pow cosTheta 4)))))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* -2 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))) (* -1 (/ (* (pow cosTheta 2) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (+ 1 (* -1 (pow cosTheta 2))))))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (* 2 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))) (pow cosTheta 2))) (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))))) (* (pow alpha 6) (pow cosTheta 2)))) (+ (* -2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (* 2 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (pow alpha 4) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))) (+ (* -1/2 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (- (* 1/2 (/ 1 (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* -1/2 (/ (pow cosTheta 2) (* (pow (PI) 2) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))) (* (pow alpha 6) (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))) (+ (* 2 (/ (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (* (- (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 2 (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2))) (/ (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 3)) (pow (+ 1 (* -1 (pow cosTheta 2))) 2)))) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2))) (* 2 (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (- (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2) (* 1/2 (/ (* (pow cosTheta 2) (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* (pow alpha 6) (* (pow cosTheta 4) (pow (- (* 1/2 (/ 1 (* (PI) (* (+ 1 (* -1 (pow cosTheta 2))) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* -1/2 (/ (pow cosTheta 2) (* (PI) (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) 2)))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 1/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* 7/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 1/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* 7/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)) (/ (* (pow cosTheta 2) (- (+ (* 5/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 17/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 9 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4))))) (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 4) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 1/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* 7/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 1/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* 7/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)) (/ (* (pow cosTheta 2) (- (+ (* 5/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 17/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 9 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4))))) (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 1/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow alpha 8) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (/ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* 7/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)) (/ (* (pow cosTheta 2) (- (+ (* 5/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 17/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 9 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4)))))) (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* 4 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 2) (- (* 4 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 4 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 2) (- (+ (* 4 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 4 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 4 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 2) (- (+ (* 4 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 4 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (* 4 (/ 1 (* (pow alpha 8) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 4 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* 1/4 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (+ (* 1/4 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) (* 1/4 (/ (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))) (pow alpha 2)))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (+ (* 1/4 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) (+ (* 1/4 (/ (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))) (pow alpha 2))) (* 1/4 (/ (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))) (pow alpha 4))))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/4 (/ (* (pow alpha 4) (+ (log -1) (* -1 (log (/ -1 alpha))))) (pow (PI) 2)))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (+ (* 1/4 (/ (+ (log -1) (* -1 (log (/ -1 alpha)))) (* (pow alpha 2) (pow (PI) 2)))) (* 1/4 (/ (+ (log -1) (* -1 (log (/ -1 alpha)))) (pow (PI) 2)))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (+ (* 1/4 (/ (+ (log -1) (* -1 (log (/ -1 alpha)))) (* (pow alpha 2) (pow (PI) 2)))) (+ (* 1/4 (/ (+ (log -1) (* -1 (log (/ -1 alpha)))) (* (pow alpha 4) (pow (PI) 2)))) (* 1/4 (/ (+ (log -1) (* -1 (log (/ -1 alpha)))) (pow (PI) 2))))))))
#s(approx (pow (log alpha) 3) #s(hole binary32 (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))
#s(approx (log alpha) #s(hole binary32 (+ (log -1) (* -1 (log (/ -1 alpha))))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (+ (* 1/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (+ (/ 1/4 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (+ (/ 1/4 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (+ (* 1/4 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))
#s(approx (* (* (PI) (PI)) (pow (log alpha) 2)) #s(hole binary32 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))
#s(approx (pow (log alpha) 2) #s(hole binary32 (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))
#s(approx (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))
#s(approx (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* -1/4 (/ (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (/ (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 4) (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (/ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* 7/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 4) (+ (* (pow cosTheta 2) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ (* (pow cosTheta 2) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (* 7/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)) (/ (* (pow cosTheta 2) (- (+ (* 5/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* (pow cosTheta 2) (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 17/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 9 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4)))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 3/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ 3 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 7/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 3/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ 3 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ (* (pow cosTheta 2) (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 17/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 9 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4)) (/ (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 7/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 3/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ 3 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2))))) (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 3/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ 3 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ (* (pow cosTheta 2) (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 17/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 9 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4)) (/ (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))) (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 3 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* (pow cosTheta 2) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 3/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ 3 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ (* (pow cosTheta 2) (- (+ (* -1/2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 17/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 9 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4)) (/ (* (pow cosTheta 2) (- (+ (* 2 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 39/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 2)))))) (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3/2 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 21 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (+ (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 39/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -3 (/ (pow cosTheta 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* -1/2 (/ (pow cosTheta 2) (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 2 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 21/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 21 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (+ (* 12 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 39/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* 3/2 (/ (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* -3 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 12 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* -3 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 2 (/ (pow cosTheta 2) (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))) (/ 12 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* -3 (/ (pow cosTheta 2) (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* -1/2 (/ (pow cosTheta 2) (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 2 (/ (pow cosTheta 2) (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))) (+ (/ 9 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 12 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* -3 (/ (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 1/2 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* -1/2 (/ (pow alpha 8) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (* 25/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (/ 25/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 54 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 139/2 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 25/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 54 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* -1/8 (/ (pow alpha 12) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 12) (- (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 12) (- (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 21/2 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 7 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (+ (* 21/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (* -1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (* (pow alpha 6) (- (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (* (pow alpha 6) (- (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 21/2 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 7 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 21/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* -3 (/ (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* (pow alpha 2) (- (* 2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 3 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* -3 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 2) (- (* 2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) #s(hole binary32 (* 3 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (* alpha alpha) (* (PI) (log alpha))) #s(hole binary32 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (* (PI) (log alpha)) #s(hole binary32 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))
#s(approx (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* 2 (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (/ 2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (/ 1 (* (PI) (log alpha))) #s(hole binary32 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (* -1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (* (pow alpha 6) (- (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (* (pow alpha 6) (- (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 39/4 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 13/2 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 3 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 39/4 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (* 3/2 (/ (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 15/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 5 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 3/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 15/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 5 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* 3 (/ (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* 3/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 9/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 5 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 9/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* 3/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 3/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 2) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (* 3/2 (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (/ 3/2 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 2) (- (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (/ 2 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (* -1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 6 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 4 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 6 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* 3/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (* 3/4 (/ (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 3/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 3/2 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (pow (PI) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) #s(hole binary32 (* (pow alpha 2) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3/2 (/ 1 (* (pow (PI) 2) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) #s(hole binary32 (* (pow alpha 2) (- (/ 1 (* (pow alpha 2) (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 1/2 (/ 1 (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* -1/2 (/ (pow alpha 8) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 8) (- (* 25/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 8) (- (/ 25/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 51 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 135/2 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 25/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 51 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ 4 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (* 4 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 4 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (+ (* 4 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 4 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 4 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (pow alpha 4))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (+ (* 4 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 4 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (* 4 (/ 1 (* (pow alpha 8) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 4 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -1/2 (/ (pow alpha 8) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 8) (- (* 25/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 8) (- (/ 25/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 51 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 135/2 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 25/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 51 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* 3 (/ (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 38 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 21 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 38 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (* 17 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 21 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* 3/16 (/ (pow alpha 14) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 14) (- (* 3/16 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))) (* 15/16 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 14) (- (+ (/ 5/16 (* (pow alpha 4) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))) (* 3/16 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (/ 15/16 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 14) (- (+ (* 5/16 (/ 1 (* (pow alpha 4) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (+ (* 1/8 (/ 1 (* (pow alpha 6) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (* 3/16 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))))) (/ 15/16 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) #s(hole binary32 (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) #s(hole binary32 (* (pow alpha 6) (- (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 1/8 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) #s(hole binary32 (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))) #s(hole binary32 (/ (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))
#s(approx (* (pow (PI) 3) (pow (log alpha) 3)) #s(hole binary32 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))
#s(approx (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) #s(hole binary32 (/ 1/8 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))
#s(approx (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))) #s(hole binary32 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* 3/2 (/ (pow alpha 8) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 8) (- (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 15/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 5/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (+ (* 5/2 (/ 1 (* (pow alpha 6) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* 3/2 (/ (pow alpha 8) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 8) (- (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 15/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 5 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 5 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (+ (/ 1 (* (pow alpha 8) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))) (/ 15/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* 5/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 5/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* -5 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 5 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 5 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* -3 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 3 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (* -3 (/ (pow alpha 2) (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (* (pow alpha 2) (- (* 2 (/ 1 (* (pow alpha 2) (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 3 (/ 1 (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* 2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (* 2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (* 3 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* -3/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 3/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) #s(hole binary32 (* (pow alpha 2) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 3/2 (/ 1 (* (PI) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* -1/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* -1/2 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* -1/2 (/ (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/16 (/ (pow alpha 8) (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (+ (* 1/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4))))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4))))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (+ (/ 1/8 (* (pow alpha 2) (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4)))) (+ (/ 3/16 (* (pow alpha 4) (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4)))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4)))))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (+ (/ 1/8 (* (pow alpha 2) (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4)))) (+ (* 3/16 (/ 1 (* (pow alpha 4) (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4))))) (+ (* 1/8 (/ 1 (* (pow alpha 6) (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4))))) (* 1/16 (/ 1 (* (pow (PI) 4) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 4))))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* -1/2 (/ (pow alpha 8) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (* 19/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (/ 19/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 30 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 59/2 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 19/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 30 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* -1/8 (/ (pow alpha 12) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 12) (- (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 12) (- (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 21/4 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 9/4 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 21/4 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -1/2 (/ (pow alpha 6) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (* 3/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (/ 3/4 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 3/4 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (/ 3/4 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (+ (* 3/4 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/2 (/ 1 (* (pow alpha 6) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* -1/2 (/ (pow alpha 6) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 6) (- (+ (/ 1/2 (* (pow alpha 6) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* -1/2 (/ (pow alpha 6) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 6) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 1/2 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* -1/2 (/ (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 6) (- (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 3/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* -3/2 (/ (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 3/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 1/2 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 3/2 (/ (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (- (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 12 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 21 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 12 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (* 9 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 12 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* 3/8 (/ (pow alpha 10) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 10) (- (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 21/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) #s(hole binary32 (* (pow alpha 10) (- (+ (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 21/8 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 21/8 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (* 3/8 (/ (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 21/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 21/8 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 21/8 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* -3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 2) (- (* 3/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* -3/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* (pow alpha 2) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 3/2 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* 3/8 (/ (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 4) (- (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 9/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 9/4 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 9/4 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (+ (* 1/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* 1/4 (/ (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (* 1/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) #s(hole binary32 (* (pow alpha 4) (- (+ (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* 3/2 (/ (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (- (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 39/2 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 21/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 39/2 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (* 17/2 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 21/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* 3/2 (/ (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 21/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 39/2 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 21/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 6) (- (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 39/2 (/ 1 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 17/2 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 21/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* 3/128 (/ (pow alpha 18) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 18) (- (* 3/128 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))) (* 3/32 (/ 1 (* (pow alpha 2) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 18) (+ (* -1 (/ (+ (* 3/32 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))) (* 3/64 (/ 1 (* (pow alpha 2) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))))) (pow alpha 2))) (* 3/128 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7))))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) #s(hole binary32 (* (pow alpha 18) (- (+ (* -1 (/ (+ (* 3/64 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))) (* 5/128 (/ 1 (* (pow alpha 2) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))))) (pow alpha 4))) (* 3/128 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7))))) (/ 3/32 (* (pow alpha 2) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* 1/32 (/ (pow alpha 14) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 14) (- (* 1/32 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))) (* 5/16 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 14) (- (+ (/ 3/16 (* (pow alpha 4) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))) (* 1/32 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (/ 5/16 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 14) (- (+ (* 3/16 (/ 1 (* (pow alpha 4) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (+ (* 5/32 (/ 1 (* (pow alpha 6) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (* 1/32 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))))) (/ 5/16 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 8) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 3/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 3/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (+ (* 3/2 (/ 1 (* (pow alpha 6) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 8) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 5/2 (/ 1 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (+ (* 3/4 (/ 1 (* (pow alpha 8) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 8) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* (pow alpha 8) (- (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (* 5/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) #s(hole binary32 (* (pow alpha 8) (- (+ (* 1/4 (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))) (/ 5/2 (* (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))) (/ 5/2 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (pow alpha 4) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2))) (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 2) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 2)))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* 1/64 (/ (pow alpha 18) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 18) (- (* 1/64 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))) (* 3/128 (/ 1 (* (pow alpha 2) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 18) (+ (* -1 (/ (+ (* 3/128 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))) (* 3/128 (/ 1 (* (pow alpha 2) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))))) (pow alpha 2))) (* 1/64 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) #s(hole binary32 (* (pow alpha 18) (+ (* -1 (/ (+ (* 3/128 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))) (+ (/ 3/128 (* (pow alpha 2) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7)))) (* 3/64 (/ 1 (* (pow alpha 4) (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7))))))) (pow alpha 2))) (* 1/64 (/ 1 (* (pow (PI) 7) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 7))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* 1/4 (/ (pow alpha 10) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 10) (- (* 1/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 7/8 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 10) (- (+ (/ 5/8 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 7/8 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 10) (- (+ (* 5/8 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (+ (* 1/8 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))) (/ 7/8 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* -1/2 (/ (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 1/2 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* -3/2 (/ (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (* 9/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (/ 9/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (/ 3 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (+ (* 3 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4))) (/ 9/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (* 3/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* -3/8 (/ (pow alpha 8) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 8) (- (* 3/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* -3/8 (/ (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) #s(hole binary32 (* (pow alpha 2) (- (* 3/4 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 3/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* -1/2 (/ (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) #s(hole binary32 (* (pow alpha 2) (- (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (* 1/2 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* -1/4 (/ (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) #s(hole binary32 (* (pow alpha 2) (- (* 1/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/4 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* -1 (/ (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (* 7/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 7/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) (/ 5/2 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (+ (* 5/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4))) (/ 7/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* -1 (/ (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (* 7/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (/ 7/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (+ (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))) (/ 5/2 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) #s(hole binary32 (* (pow alpha 4) (- (+ (* -1 (/ (+ (* 5/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 3/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4))) (/ 7/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* -1/16 (/ (pow alpha 12) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 12) (- (* 3/32 (/ 1 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (* 1/16 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (/ 3/32 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))) (/ 3/32 (* (pow alpha 4) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (* 1/16 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (/ 3/32 (* (pow alpha 2) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5)))) (+ (* 3/32 (/ 1 (* (pow alpha 4) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))) (* 1/8 (/ 1 (* (pow alpha 6) (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))) (* 1/16 (/ 1 (* (pow (PI) 5) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 5))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* 1/64 (/ (pow alpha 12) (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 12) (+ (* 3/64 (/ 1 (* (pow alpha 2) (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6))))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 12) (+ (/ 3/64 (* (pow alpha 2) (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6)))) (+ (/ 3/32 (* (pow alpha 4) (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6)))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6)))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) #s(hole binary32 (* (pow alpha 12) (+ (/ 3/64 (* (pow alpha 2) (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6)))) (+ (* 3/32 (/ 1 (* (pow alpha 4) (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6))))) (+ (* 7/64 (/ 1 (* (pow alpha 6) (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6))))) (* 1/64 (/ 1 (* (pow (PI) 6) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 6))))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* -1/8 (/ (pow alpha 12) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 12) (- (* 3/2 (/ 1 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 12) (- (/ 3/2 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (+ (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))) (/ 27/8 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) #s(hole binary32 (* (pow alpha 12) (- (+ (* 2 (/ 1 (* (pow alpha 6) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (/ 3/2 (* (pow alpha 2) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (+ (* 27/8 (/ 1 (* (pow alpha 4) (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3))))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (+ (log -1) (* -1 (log (/ -1 alpha)))) 3)))))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ 1/2 (* (pow alpha 4) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (pow alpha 4))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (+ (/ 1/2 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (/ 1/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))) (pow alpha 4))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) #s(hole binary32 (/ (- (+ (* 1/2 (/ 1 (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow alpha 6) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))))) (+ (/ 1/2 (* (pow alpha 2) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow alpha 8) (* (PI) (+ (log -1) (* -1 (log (/ -1 alpha)))))))))) (pow alpha 4))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (+ (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) #s(hole binary32 (- (+ (* -1 (/ (* (+ 1 (* -1 (pow cosTheta 2))) (+ (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))) (+ (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (pow (+ 1 (* -1 (pow cosTheta 2))) 2) (+ (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 6) (pow cosTheta 4)))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (/ -1/2 (* alpha (* (pow cosTheta 2) (log (/ -1 alpha)))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (* -1 (/ (- (* 1/2 (/ 1 (* (pow cosTheta 2) (log (/ -1 alpha))))) (* 1/2 (/ 1 (* alpha (* (pow cosTheta 2) (log (/ -1 alpha))))))) alpha))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* alpha (* (pow cosTheta 4) (log (/ -1 alpha)))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (log (/ -1 alpha)))))) alpha)) (* 1/2 (/ 1 (* (pow cosTheta 2) (log (/ -1 alpha)))))) alpha))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* (pow cosTheta 4) (log (/ -1 alpha))))) (* 1/2 (/ (+ 1 (* -1 (pow cosTheta 2))) (* alpha (* (pow cosTheta 4) (log (/ -1 alpha))))))) alpha)) (* 1/2 (/ 1 (* (pow cosTheta 2) (log (/ -1 alpha)))))) alpha)) (* 1/2 (/ 1 (* (pow cosTheta 2) (log (/ -1 alpha)))))) alpha))))
#s(approx (- alpha 1) #s(hole binary32 (* -1 (* alpha (- (/ 1 alpha) 1)))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (log (/ -1 alpha)))))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (log (/ -1 alpha)))) (* -2 (/ (* (log (/ -1 alpha)) (+ 1 (* -1 (pow cosTheta 2)))) (pow alpha 2)))))))
#s(approx (log (* alpha alpha)) #s(hole binary32 (* -2 (log (/ -1 alpha)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (/ -1/2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow cosTheta 2))) (pow alpha 4))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) #s(hole binary32 (- (+ (* -1 (/ (+ (* -1 (/ (* (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow cosTheta 2))) (+ (* -1 (/ (* (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow cosTheta 2))) (- 1 (pow cosTheta 2))) (pow cosTheta 2))) (* -1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (pow alpha 6))) (/ 1/2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))) (+ (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow alpha 2) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)) (* (pow alpha 4) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha))))))) (+ (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (/ (* (- 1 (pow cosTheta 2)) (- (* 1/2 (/ 1 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha)))))) (* -1/2 (/ (- 1 (pow cosTheta 2)) (* (pow cosTheta 4) (* (PI) (log (/ -1 alpha)))))))) (* (pow alpha 4) (pow cosTheta 2)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* -2 (* (pow alpha 2) (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) #s(hole binary32 (* (pow alpha 2) (+ (* -2 (* (pow cosTheta 2) (* (PI) (log (/ -1 alpha))))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 6))) (+ (* -2 (/ (* (PI) (* (log (/ -1 alpha)) (- 1 (pow cosTheta 2)))) (pow alpha 2))) (* 2 (/ (* (PI) (* (log (/ -1 alpha)) (+ (* -1 (pow cosTheta 2)) (pow cosTheta 2)))) (pow alpha 4)))))))))
#s(approx (* (PI) (log (* alpha alpha))) #s(hole binary32 (* -2 (* (PI) (log (/ -1 alpha))))))
#s(approx (pow (* alpha alpha) (PI)) #s(hole binary32 (exp (* -2 (* (PI) (log (/ -1 alpha)))))))
Outputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
(+.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(literal 1/8 binary32)
(/.f32 (neg.f32 (pow.f32 alpha #s(literal 6 binary32))) (neg.f32 (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(pow.f32 alpha #s(literal 6 binary32))
(exp.f32 (*.f32 (log.f32 alpha) #s(literal 6 binary32)))
alpha
#s(literal 6 binary32)
(*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(*.f32 (*.f32 (PI.f32) (PI.f32)) (PI.f32))
(*.f32 (PI.f32) (*.f32 (PI.f32) (PI.f32)))
(pow.f32 (PI.f32) #s(literal 3 binary32))
(exp.f32 (*.f32 (log.f32 (PI.f32)) #s(literal 3 binary32)))
(PI.f32)
#s(literal 3 binary32)
(*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (log.f32 alpha))
(*.f32 (log.f32 alpha) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))
(pow.f32 (log.f32 alpha) #s(literal 3 binary32))
(exp.f32 (*.f32 (log.f32 (log.f32 alpha)) #s(literal 3 binary32)))
(log.f32 alpha)
(-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
(fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
(+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(literal 1/4 binary32)
(/.f32 #s(literal -1 binary32) (neg.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
(pow.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))) #s(literal -1 binary32))
#s(literal 1 binary32)
(*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))
(pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 2 binary32))
(*.f32 (neg.f32 (PI.f32)) (neg.f32 (PI.f32)))
(*.f32 (fabs.f32 (PI.f32)) (fabs.f32 (PI.f32)))
(*.f32 (PI.f32) (PI.f32))
(pow.f32 (PI.f32) #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 (PI.f32)) #s(literal 2 binary32)))
(*.f32 (log.f32 alpha) (log.f32 alpha))
(pow.f32 (log.f32 alpha) #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 (log.f32 alpha)) #s(literal 2 binary32)))
#s(literal 2 binary32)
(*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(/.f32 (neg.f32 (pow.f32 alpha #s(literal 4 binary32))) (neg.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
(pow.f32 alpha #s(literal 4 binary32))
(exp.f32 (*.f32 (log.f32 alpha) #s(literal 4 binary32)))
#s(literal 4 binary32)
(*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(literal -1/4 binary32)
(/.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
(*.f32 (neg.f32 alpha) (neg.f32 alpha))
(*.f32 (fabs.f32 alpha) (fabs.f32 alpha))
(*.f32 alpha alpha)
(pow.f32 alpha #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 alpha) #s(literal 2 binary32)))
(*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(*.f32 (neg.f32 cosTheta) (neg.f32 cosTheta))
(*.f32 (fabs.f32 cosTheta) (fabs.f32 cosTheta))
(*.f32 cosTheta cosTheta)
(pow.f32 cosTheta #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 cosTheta) #s(literal 2 binary32)))
cosTheta
(-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(+.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(+.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(/.f32 (neg.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))))))) (neg.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))))))
(fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))
(+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))
(/.f32 (neg.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (neg.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
(fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(+.f32 (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(literal -1 binary32)
(-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))))
(*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))
#s(literal 3/2 binary32)
(/.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))
(log.f32 (pow.f32 alpha (PI.f32)))
(*.f32 (PI.f32) (log.f32 alpha))
(*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))
(-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))
#s(literal -1/2 binary32)
(*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 #s(literal -1 binary32) (neg.f32 (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))
(pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal -1 binary32))
(fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))))
(+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))))
#s(literal 1/2 binary32)
(/.f32 (neg.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (neg.f32 (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha)))
(fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(+.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(/.f32 (neg.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))))) (neg.f32 (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha)))
(fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
(+.f32 (*.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
(*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(+.f32 (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
(fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
(+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
(*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))
(+.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))
(fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
(+.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
(/.f32 (neg.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))) (neg.f32 (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))
(fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
(+.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
(*.f32 (neg.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (neg.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
(*.f32 (fabs.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fabs.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
(*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(pow.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) #s(literal 2 binary32)))
(*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha)))
(/.f32 (neg.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (neg.f32 (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))
(/.f32 (neg.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (neg.f32 (PI.f32)))
(/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32))
(/.f32 (neg.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))
(/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))
(fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(+.f32 (*.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
#s(literal 5/4 binary32)
(/.f32 #s(literal -1 binary32) (neg.f32 (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(pow.f32 (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) #s(literal -1 binary32))
(/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(/.f32 (neg.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))) (neg.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
(-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))
(*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
(/.f32 (neg.f32 (pow.f32 alpha #s(literal 6 binary32))) (neg.f32 (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
(/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))
(*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))
(pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 3 binary32))
(*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
(/.f32 #s(literal -1 binary32) (neg.f32 (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
(/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))
(pow.f32 (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))) #s(literal -1 binary32))
(-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
(fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(+.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha)))
(/.f32 (neg.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (neg.f32 (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))
(/.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (PI.f32)))
(/.f32 (*.f32 alpha alpha) (PI.f32))
(/.f32 (neg.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))
(/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))
(*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha)))
(/.f32 (neg.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (neg.f32 (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))
(/.f32 (neg.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))
(/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))
(*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
(/.f32 (neg.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (neg.f32 (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))
(*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(*.f32 (neg.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (neg.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(*.f32 (fabs.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fabs.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(pow.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) #s(literal 2 binary32)))
(/.f32 (neg.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (neg.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(/.f32 (fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(fma.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
(+.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
(-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))
(+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (neg.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (neg.f32 (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))
(*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(/.f32 (neg.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))))) (neg.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))))
(fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))
(+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))
(*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(/.f32 (neg.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (neg.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
(fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))
(+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (neg.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (neg.f32 (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha)))
(/.f32 (neg.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (neg.f32 (*.f32 (PI.f32) (log.f32 alpha))))
(/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))
(fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(+.f32 (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
#s(literal 3/4 binary32)
(/.f32 (neg.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))) (neg.f32 (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
(+.f32 (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
(*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))))
(+.f32 (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))))
(*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))
(*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
(*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(/.f32 (neg.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (neg.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
(+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
(/.f32 (neg.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (neg.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
(*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
(fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(+.f32 (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
#s(literal 3/8 binary32)
(/.f32 (neg.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (neg.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
(*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
(pow.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) #s(literal 3 binary32))
(*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
(/.f32 #s(literal -1/8 binary32) (neg.f32 (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))
(/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (PI.f32)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
(/.f32 (*.f32 (+.f32 alpha #s(literal 1 binary32)) (-.f32 alpha #s(literal 1 binary32))) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
(/.f32 (neg.f32 (+.f32 alpha #s(literal 1 binary32))) (neg.f32 (PI.f32)))
(/.f32 (+.f32 alpha #s(literal 1 binary32)) (PI.f32))
(+.f32 alpha #s(literal 1 binary32))
(/.f32 (neg.f32 (-.f32 alpha #s(literal 1 binary32))) (neg.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
(/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(-.f32 alpha #s(literal 1 binary32))
(*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(log.f32 (*.f32 alpha alpha))
(*.f32 #s(literal 2 binary32) (log.f32 alpha))
(+.f32 (log.f32 alpha) (log.f32 alpha))
(fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))
(+.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) #s(literal 1 binary32))
(expm1.f32 (*.f32 (log.f32 alpha) #s(literal 2 binary32)))
(-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))
(/.f32 (neg.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (neg.f32 (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (expm1.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) #s(literal 3 binary32))) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta)))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (expm1.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) #s(literal 3 binary32))) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta))))
(*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (expm1.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) #s(literal 3 binary32))) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta)))
(log.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)))
(*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))
(+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (expm1.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) #s(literal 3 binary32))) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta))
(*.f32 (*.f32 (/.f32 (expm1.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) #s(literal 3 binary32))) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta)
(*.f32 (/.f32 (expm1.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) #s(literal 3 binary32))) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta)
(/.f32 (neg.f32 (expm1.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) #s(literal 3 binary32)))) (neg.f32 #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
(/.f32 (expm1.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) #s(literal 3 binary32))) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))
(expm1.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) #s(literal 3 binary32)))
(-.f32 (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 alpha alpha) alpha)) #s(literal 1 binary32))
(*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha)) (*.f32 alpha alpha))
(*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (*.f32 alpha alpha) alpha))
(*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 alpha alpha) (*.f32 alpha alpha)))
(pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32))
(exp.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) #s(literal 3 binary32)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))
(+.f32 #s(literal 1 binary32) (*.f32 alpha alpha))
(/.f32 (neg.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (*.f32 (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) #s(literal 1 binary32)))) (neg.f32 (*.f32 (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))))
(/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (*.f32 (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) #s(literal 1 binary32))) (*.f32 (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
(-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (*.f32 (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) #s(literal 1 binary32)))
(log.f32 (pow.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))) (*.f32 alpha alpha)))
(*.f32 (*.f32 alpha alpha) (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))
(log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))
(*.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) #s(literal 1 binary32)))
(*.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (pow.f32 (*.f32 alpha alpha) (PI.f32)))
(pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
(pow.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(exp.f32 (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (pow.f32 alpha (PI.f32)) (pow.f32 alpha (PI.f32)))
(pow.f32 (*.f32 alpha alpha) (PI.f32))
(pow.f32 alpha (*.f32 #s(literal 2 binary32) (PI.f32)))
(exp.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (PI.f32)))
(*.f32 (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) #s(literal 1 binary32))
(log.f32 (pow.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))) (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
(*.f32 (neg.f32 (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (neg.f32 (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
(*.f32 (fabs.f32 (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (fabs.f32 (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
(*.f32 (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))
(pow.f32 (*.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) #s(literal 2 binary32))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (/.f32 (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))) (/.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (/.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (* cosTheta cosTheta) (*.f32 cosTheta cosTheta))
#s(approx cosTheta cosTheta)
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (/.f32 alpha (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (/.f32 (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (/.f32 alpha (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (-.f32 alpha #s(literal 1 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))) (/.f32 (*.f32 (-.f32 alpha #s(literal 1 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (/.f32 alpha (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (/.f32 #s(literal 1 binary32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (fma.f32 #s(literal 2 binary32) (log.f32 alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) #s(literal 1 binary32))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (/.f32 (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))) (/.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (fma.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) #s(literal 1 binary32))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32))) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (/.f32 (*.f32 cosTheta (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32))) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/24 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/24 binary32) (/.f32 (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (+.f32 (*.f32 #s(literal 2 binary32) (*.f32 (-.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (/.f32 (*.f32 (fma.f32 #s(literal 1/12 binary32) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 4 binary32)))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/24 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/720 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -360 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (fma.f32 #s(literal 120 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (*.f32 #s(literal 240 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/720 binary32) (/.f32 (fma.f32 #s(literal -360 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (fma.f32 #s(literal 120 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (*.f32 #s(literal 240 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (fma.f32 #s(literal 2 binary32) (*.f32 (-.f32 (*.f32 #s(literal 1/24 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/24 binary32) (/.f32 (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (+.f32 (*.f32 #s(literal 2 binary32) (*.f32 (-.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (/.f32 (*.f32 (fma.f32 #s(literal 1/12 binary32) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 4 binary32)))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (/.f32 (fma.f32 (*.f32 (+.f32 (*.f32 #s(literal 1/360 binary32) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (fma.f32 #s(literal -360 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (fma.f32 #s(literal 120 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (*.f32 #s(literal 240 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))))) (*.f32 #s(literal 1/12 binary32) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/12 binary32) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (-.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))))) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))))) (fma.f32 #s(literal 1/24 binary32) (/.f32 (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (+.f32 (*.f32 #s(literal 2 binary32) (*.f32 (-.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (/.f32 (*.f32 (fma.f32 #s(literal 1/12 binary32) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 4 binary32)))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (-.f32 (fma.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (-.f32 (fma.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/24 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (-.f32 (fma.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (+.f32 (*.f32 #s(literal 1/24 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/720 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -360 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (fma.f32 #s(literal 120 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (*.f32 #s(literal 240 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))))) (*.f32 #s(literal 1/720 binary32) (fma.f32 #s(literal -360 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (fma.f32 #s(literal 120 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (*.f32 #s(literal 240 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))))))) (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (fma.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (fma.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/24 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (fma.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/720 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -360 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (fma.f32 #s(literal 120 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (*.f32 #s(literal 240 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))))) (*.f32 #s(literal 1/24 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/24 binary32) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/720 binary32) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -360 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (fma.f32 #s(literal 120 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (*.f32 #s(literal 240 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))))) (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (pow.f32 (*.f32 alpha alpha) (PI.f32)))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (fma.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha alpha) (PI.f32)))) (pow.f32 (*.f32 alpha alpha) (PI.f32))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (*.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (pow.f32 (*.f32 alpha alpha) (PI.f32))))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha alpha) (PI.f32))))) (pow.f32 (*.f32 alpha alpha) (PI.f32))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha alpha) (PI.f32))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/6 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (*.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)) (pow.f32 (*.f32 alpha alpha) (PI.f32))))) (*.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (*.f32 (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)) (pow.f32 (*.f32 alpha alpha) (PI.f32)))))))) (pow.f32 (*.f32 alpha alpha) (PI.f32))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) (fma.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) (fma.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/24 binary32) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) (fma.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/720 binary32) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal -360 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (fma.f32 #s(literal 120 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (*.f32 #s(literal 240 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))))) (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (fma.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 2 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/12 binary32) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 2 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/12 binary32) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) (+.f32 (*.f32 #s(literal 1/360 binary32) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (fma.f32 #s(literal -360 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (fma.f32 #s(literal 120 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))) (*.f32 #s(literal 240 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 3 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))))) (*.f32 #s(literal 1/12 binary32) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (fma.f32 #s(literal -12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))) (*.f32 #s(literal 12 binary32) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 1 binary32))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (-.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 1 binary32))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) #s(literal 1 binary32))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta)))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))))) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 #s(literal 4 binary32) (/.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))))))))) (pow.f32 cosTheta #s(literal 4 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (/.f32 (-.f32 (fma.f32 #s(literal 4 binary32) (/.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (fma.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))) (pow.f32 cosTheta #s(literal 6 binary32))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))))) (pow.f32 cosTheta #s(literal 4 binary32))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (fma.f32 #s(literal 2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))))))) (pow.f32 cosTheta #s(literal 6 binary32))) (fma.f32 #s(literal 4 binary32) (/.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))))))))) (pow.f32 cosTheta #s(literal 4 binary32))) (fma.f32 #s(literal 4 binary32) (/.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha)))))))))))))))))) (pow.f32 cosTheta #s(literal 6 binary32))) (*.f32 #s(literal 4 binary32) (/.f32 (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (PI.f32) (log.f32 alpha))))))))) (pow.f32 cosTheta #s(literal 6 binary32)))))))))) (*.f32 cosTheta cosTheta)))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (+.f32 (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (+.f32 (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (+.f32 (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (+.f32 (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (+.f32 (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (+.f32 (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (+.f32 (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (+.f32 (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (+.f32 (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (+.f32 (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (+.f32 (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (+.f32 (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (+.f32 (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (*.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (/.f32 (-.f32 (/.f32 (fma.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))) (*.f32 (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))))) (*.f32 (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32)))))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) alpha) (-.f32 alpha #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (-.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) alpha)) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (*.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) alpha)) (*.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (/.f32 (fma.f32 alpha (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))) (*.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) alpha)) (*.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (*.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))) alpha)) (*.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))))) (/.f32 (fma.f32 alpha (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))) (*.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) alpha)) (*.f32 (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32)))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 3 binary32))))) (/.f32 (fma.f32 alpha (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32)))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) alpha)) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 2 binary32)))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 4 binary32))))))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (/.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 cosTheta cosTheta)))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 alpha alpha)) #s(literal 1 binary32))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (*.f32 (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))) (*.f32 alpha alpha))) (*.f32 (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (/.f32 (fma.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (*.f32 (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))) (*.f32 alpha alpha))) (*.f32 (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (*.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (*.f32 alpha alpha))) (*.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))))))) (*.f32 cosTheta cosTheta)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) #s(literal 4 binary32)))))) (/.f32 (fma.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (*.f32 (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))) (*.f32 alpha alpha))) (*.f32 (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))) (/.f32 (fma.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) #s(literal 4 binary32))))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (*.f32 alpha alpha))) (*.f32 (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (*.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (pow.f32 (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))) #s(literal 4 binary32)))))))))) (*.f32 cosTheta cosTheta)))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (PI.f32) (*.f32 (*.f32 #s(literal 2 binary32) (log.f32 alpha)) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (*.f32 cosTheta cosTheta)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 cosTheta cosTheta) (/.f32 (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32)))))) (/.f32 #s(literal 1 binary32) (+.f32 #s(literal 1 binary32) (fma.f32 alpha alpha (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (*.f32 cosTheta cosTheta)))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (*.f32 cosTheta cosTheta)))) (pow.f32 (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (-.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (*.f32 cosTheta cosTheta)))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (*.f32 cosTheta cosTheta)))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (*.f32 cosTheta cosTheta)))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (*.f32 cosTheta cosTheta))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (-.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (*.f32 cosTheta cosTheta))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (*.f32 cosTheta cosTheta))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (pow.f32 (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (-.f32 (+.f32 #s(literal 1 binary32) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))))))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))))) (fma.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (fma.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))) (fma.f32 #s(literal 4 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))))))))) (fma.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))))))))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (fma.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (fma.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (fma.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (fma.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 #s(literal 4 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal -4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (pow alpha 6) (pow.f32 alpha #s(literal 6 binary32)))
#s(approx alpha alpha)
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal 1/4 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (fma.f32 #s(literal 1/4 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (fma.f32 #s(literal 1/4 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/4 binary32) (*.f32 (PI.f32) (log.f32 alpha)) (*.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (log.f32 alpha) (*.f32 (PI.f32) (PI.f32)))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (log.f32 alpha) (*.f32 (PI.f32) (PI.f32))) (*.f32 #s(literal 1/4 binary32) (/.f32 (log.f32 (pow.f32 alpha (*.f32 alpha alpha))) (*.f32 (PI.f32) (PI.f32))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (log.f32 alpha) (*.f32 (PI.f32) (PI.f32)))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/4 binary32) (/.f32 (log.f32 alpha) (*.f32 (PI.f32) (PI.f32))) (*.f32 #s(literal 1/4 binary32) (/.f32 (log.f32 (pow.f32 alpha (*.f32 alpha alpha))) (*.f32 (PI.f32) (PI.f32))))))))
#s(approx (pow (log alpha) 3) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))
#s(approx (log alpha) (log.f32 alpha))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (/.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (fma.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (/.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (* (* (PI) (PI)) (pow (log alpha) 2)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))
#s(approx (pow (log alpha) 2) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))
#s(approx (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (pow alpha 4) (pow.f32 alpha #s(literal 4 binary32)))
#s(approx (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (* alpha alpha) (*.f32 alpha alpha))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (fma.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (fma.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (fma.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (fma.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (fma.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (fma.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (fma.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (/.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -3 binary32) (/.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 21/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 28 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal -70 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 28 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 54 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 70 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 28 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 31/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 54 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 70 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 28 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (*.f32 #s(literal 7 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal -21/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 7 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 7 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -1/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 7 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (/.f32 #s(literal 7 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (+.f32 (*.f32 #s(literal -21/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 7 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 7 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -1/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 7 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (/.f32 #s(literal 2 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (+.f32 (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (/.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (*.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (* alpha alpha) (* (PI) (log alpha))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (PI) (log alpha)) (*.f32 (PI.f32) (log.f32 alpha)))
#s(approx (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* 2 (/ 1 (* (PI) (log alpha)))) (/.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (/ 1 (* (PI) (log alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) (/.f32 #s(literal 13/2 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) (+.f32 (*.f32 #s(literal -39/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 13/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 39/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 13/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -1/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))) (*.f32 #s(literal 39/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 13/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) (/.f32 #s(literal 5 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) (+.f32 (*.f32 #s(literal -15/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 5 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 15/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 5 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (/.f32 #s(literal 5 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+.f32 (*.f32 #s(literal -15/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 5 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 15/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 5 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha))) (*.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) (/.f32 #s(literal 5 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) (+.f32 (*.f32 #s(literal -9/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 5 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 5 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (+.f32 (*.f32 #s(literal -9/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (/.f32 #s(literal 3/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (fma.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* 3/2 (/ 1 (* (PI) (log alpha)))) (/.f32 #s(literal 3/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/.f32 #s(literal 2 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (/.f32 #s(literal 4 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (+.f32 (*.f32 #s(literal -6 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 9/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 6 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -1/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))) (*.f32 #s(literal 6 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+.f32 (*.f32 #s(literal -5/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (+.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) (/.f32 #s(literal 3/2 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) (+.f32 (*.f32 #s(literal -9/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/.f32 #s(literal 3/2 binary32) (log.f32 (pow.f32 alpha (*.f32 (PI.f32) (PI.f32))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (+.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 alpha (*.f32 (PI.f32) (PI.f32)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 alpha (*.f32 (PI.f32) (PI.f32))))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 28 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 #s(literal 4 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (fma.f32 #s(literal -4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/.f32 #s(literal -9/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 23 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 18 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (/.f32 #s(literal -1/8 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (-.f32 (*.f32 #s(literal -5/16 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -5/16 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))) (*.f32 #s(literal 5/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 17/16 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))) (*.f32 #s(literal 5/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))))) (*.f32 #s(literal 5/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32))))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (/.f32 #s(literal -1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (* (pow (PI) 3) (pow (log alpha) 3)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))
#s(approx (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (fma.f32 #s(literal 5/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (fma.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal 5/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (fma.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -15/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (fma.f32 #s(literal 5 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (+.f32 (*.f32 #s(literal -15/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 5 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 15/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 5 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 #s(literal -5/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 5/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 #s(literal 5 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -5 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 5 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
#s(approx (/ (* alpha alpha) (PI)) (/.f32 (*.f32 alpha alpha) (PI.f32)))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (/.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (/.f32 #s(literal 3/2 binary32) (*.f32 (PI.f32) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (fma.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (/.f32 #s(literal 1/16 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (fma.f32 #s(literal 1/8 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32))) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 3/16 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32))))) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (fma.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/8 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32))) (*.f32 #s(literal 3/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32))))) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 4 binary32))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (/.f32 #s(literal -5/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (-.f32 (*.f32 #s(literal 4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 5 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -26 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 5 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/.f32 #s(literal -5/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (-.f32 (*.f32 #s(literal 3/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 5/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal 3/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))) (*.f32 #s(literal 5/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal 9/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))) (*.f32 #s(literal 5/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+.f32 (*.f32 #s(literal 3/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (fma.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal 3/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (fma.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal -3/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal -21 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 12 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 9 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (*.f32 #s(literal 21/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal -21/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 21/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 21/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 21/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (/.f32 #s(literal 21/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (+.f32 (*.f32 #s(literal -21/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 21/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 21/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 21/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (/.f32 #s(literal 3/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+.f32 (*.f32 #s(literal -3/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (/.f32 #s(literal 3/2 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (+.f32 (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (/.f32 #s(literal 9/4 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+.f32 (*.f32 #s(literal -9/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) (/.f32 #s(literal 5/2 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) (+.f32 (*.f32 #s(literal -5/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (fma.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 21/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/.f32 #s(literal -5/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 27/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (/.f32 #s(literal -5/128 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (-.f32 (*.f32 #s(literal -3/32 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32)))) (*.f32 #s(literal 5/128 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -9/64 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32)))) (*.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32)))))) (*.f32 #s(literal 5/128 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 11/128 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32)))) (*.f32 #s(literal 1/32 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32)))))) (*.f32 #s(literal 9/64 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32)))))) (*.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32)))))) (*.f32 #s(literal 5/128 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/.f32 #s(literal -3/32 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (-.f32 (*.f32 #s(literal -3/16 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))) (*.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -3/16 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))) (*.f32 #s(literal 3/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))))) (*.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 13/32 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))) (*.f32 #s(literal 3/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))))) (*.f32 #s(literal 3/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))))) (*.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (fma.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (fma.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -5/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (+.f32 (*.f32 #s(literal 5/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (+.f32 (*.f32 #s(literal -5/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) (*.f32 #s(literal 5/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (+.f32 (*.f32 #s(literal -5/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/.f32 #s(literal -1/64 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (-.f32 (*.f32 #s(literal -3/128 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32)))) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -3/128 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32)))) (*.f32 #s(literal 3/128 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32)))))) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 5/64 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32)))) (*.f32 #s(literal 1/32 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32)))))) (*.f32 #s(literal 3/128 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32)))))) (*.f32 #s(literal 3/128 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32)))))) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 7 binary32))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/.f32 #s(literal -1/4 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 5/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 3 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal -9/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 3/4 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal -3/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) (/.f32 #s(literal 3/4 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) (+.f32 (*.f32 #s(literal -3/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+.f32 (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 #s(literal -1/16 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (-.f32 (*.f32 #s(literal -3/32 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -3/32 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))) (*.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))))) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))) (*.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))))) (*.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32)))))) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 5 binary32))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (/.f32 #s(literal 1/64 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 6 binary32))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (fma.f32 #s(literal 3/64 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 6 binary32))) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 6 binary32))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 3/32 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 6 binary32))) (*.f32 #s(literal 3/64 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 6 binary32))))) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 6 binary32))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (fma.f32 (*.f32 alpha alpha) (fma.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 6 binary32))) (*.f32 #s(literal 7/64 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 6 binary32))))) (*.f32 #s(literal 3/64 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 6 binary32))))) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (log.f32 alpha)) #s(literal 6 binary32))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/.f32 #s(literal -3/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (-.f32 (*.f32 #s(literal 3/8 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (-.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (-.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (+.f32 (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -27/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (fma.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (+ alpha 1) (PI)) (/.f32 #s(literal 1 binary32) (PI.f32)))
#s(approx (/ (+ alpha 1) (PI)) (/.f32 (fma.f32 #s(literal 1 binary32) (PI.f32) (*.f32 (PI.f32) alpha)) (*.f32 (PI.f32) (PI.f32))))
#s(approx (+ alpha 1) #s(literal 1 binary32))
#s(approx (+ alpha 1) (+.f32 #s(literal 1 binary32) alpha))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 alpha (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (*.f32 alpha (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha (*.f32 cosTheta cosTheta)) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (-.f32 (*.f32 alpha (fma.f32 alpha (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha (*.f32 cosTheta cosTheta)) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))
#s(approx (- alpha 1) #s(literal -1 binary32))
#s(approx (- alpha 1) (-.f32 alpha #s(literal 1 binary32)))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 #s(literal 2 binary32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (fma.f32 #s(literal 2 binary32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 alpha (*.f32 cosTheta cosTheta)))))))
#s(approx (log (* alpha alpha)) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))))
#s(approx (- (* alpha alpha) 1) #s(literal -1 binary32))
#s(approx (- (* alpha alpha) 1) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (+.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))))))))))))
#s(approx (* (PI) (log (* alpha alpha))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (+.f32 #s(literal 1 binary32) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 #s(literal -1 binary32) cosTheta))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (fma.f32 #s(literal -1 binary32) cosTheta (*.f32 (*.f32 alpha alpha) cosTheta)))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (fma.f32 #s(literal -1 binary32) cosTheta (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (+.f32 cosTheta (*.f32 #s(literal -1 binary32) cosTheta)))) (*.f32 #s(literal -1 binary32) cosTheta)))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (+.f32 (*.f32 #s(literal -1 binary32) cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 alpha alpha) (+.f32 cosTheta (*.f32 #s(literal -1 binary32) cosTheta))) (+.f32 cosTheta (*.f32 #s(literal -1 binary32) cosTheta)))) (*.f32 #s(literal -1 binary32) cosTheta)))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) #s(literal -1 binary32))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))
#s(approx (- (pow (* alpha alpha) 3) 1) #s(literal -1 binary32))
#s(approx (- (pow (* alpha alpha) 3) 1) (-.f32 (pow.f32 alpha #s(literal 6 binary32)) #s(literal 1 binary32)))
#s(approx (pow (* alpha alpha) 3) (pow.f32 alpha #s(literal 6 binary32)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) #s(literal 1 binary32))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (+ 1 (* alpha alpha)) #s(literal 1 binary32))
#s(approx (+ 1 (* alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) (/.f32 #s(literal -1/2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (-.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 (-.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (-.f32 (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (fma.f32 #s(literal -1/8 binary32) (/.f32 (fma.f32 #s(literal 1/6 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 #s(literal 4 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))))) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (-.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 (-.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 (-.f32 (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 #s(literal 1/720 binary32) (fma.f32 #s(literal -2880 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (fma.f32 #s(literal 960 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1920 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (fma.f32 #s(literal -1/8 binary32) (/.f32 (fma.f32 #s(literal 1/180 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -2880 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (fma.f32 #s(literal 960 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1920 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))))) (*.f32 #s(literal 1/6 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (fma.f32 #s(literal 1/6 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 #s(literal 4 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (-.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (-.f32 (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (fma.f32 #s(literal -1/8 binary32) (/.f32 (fma.f32 #s(literal 1/6 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 #s(literal 4 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))))) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (-.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (fma.f32 #s(literal -1/8 binary32) (/.f32 (fma.f32 #s(literal 1/6 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 #s(literal 4 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32))))) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (-.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (*.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (+.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 #s(literal 1/720 binary32) (fma.f32 #s(literal -2880 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (fma.f32 #s(literal 960 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1920 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))))))))) (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (*.f32 (*.f32 alpha alpha) (+.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/24 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/720 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2880 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (fma.f32 #s(literal 960 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1920 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))) (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (+.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/24 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/720 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2880 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (fma.f32 #s(literal 960 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1920 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))) (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (pow.f32 (exp.f32 #s(literal 2 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (+.f32 (pow.f32 (exp.f32 #s(literal 2 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (exp.f32 #s(literal 2 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (log.f32 alpha))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (+.f32 (pow.f32 (exp.f32 #s(literal 2 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (exp.f32 #s(literal 2 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (exp.f32 #s(literal 2 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (log.f32 alpha)))))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (+.f32 (pow.f32 (exp.f32 #s(literal 2 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (exp.f32 #s(literal 2 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (log.f32 alpha)))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 4/3 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (exp.f32 #s(literal 2 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (*.f32 #s(literal 2 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (exp.f32 #s(literal 2 binary32)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (pow (* alpha alpha) (PI)) (pow.f32 (exp.f32 #s(literal 2 binary32)) (*.f32 (PI.f32) (log.f32 alpha))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha)))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) (+.f32 (*.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/24 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) (fma.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/720 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2880 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (fma.f32 #s(literal 960 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1920 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))) (*.f32 #s(literal 1/24 binary32) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (*.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (fma.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 #s(literal 8 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (fma.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 8 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/6 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 #s(literal 4 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (fma.f32 #s(literal 4 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 8 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 2 binary32)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/6 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (fma.f32 #s(literal 4 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal 1/180 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -2880 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (fma.f32 #s(literal 960 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))) (*.f32 #s(literal 1920 binary32) (*.f32 (pow.f32 cosTheta #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))))))) (*.f32 #s(literal 1/6 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (fma.f32 #s(literal -48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 48 binary32) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 cosTheta cosTheta))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))))) (*.f32 #s(literal -2 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 alpha alpha))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (fma.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))))))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 #s(literal -2 binary32) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -2 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 alpha alpha)) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 cosTheta #s(literal 4 binary32)))) (+.f32 (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (fma.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))))))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 #s(literal -2 binary32) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 #s(literal -2 binary32) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 cosTheta cosTheta)) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -2 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 alpha alpha)) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) #s(literal 2 binary32)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (+.f32 (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 (-.f32 (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))) (*.f32 #s(literal -2 binary32) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))) (-.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))))))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 alpha alpha))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (fma.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 9 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 17/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 alpha alpha) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 alpha alpha))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 alpha alpha))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (fma.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 9 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 17/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 alpha alpha) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 alpha alpha))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (fma.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 9 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 17/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 alpha alpha) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 alpha alpha))))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 #s(literal -4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 #s(literal 4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (fma.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (/.f32 #s(literal 4 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal -1/4 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/4 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) (*.f32 alpha alpha))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/4 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) (*.f32 (PI.f32) (PI.f32)))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/4 binary32) (/.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (PI.f32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (*.f32 (PI.f32) (PI.f32)))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/4 binary32) (/.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (PI.f32)))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (PI.f32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (*.f32 (PI.f32) (PI.f32))))))))
#s(approx (pow (log alpha) 3) (*.f32 #s(literal -1 binary32) (pow.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) #s(literal 3 binary32))))
#s(approx (log alpha) (*.f32 #s(literal -1 binary32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (+.f32 (/.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (+.f32 (/.f32 #s(literal 1/4 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))
#s(approx (* (* (PI) (PI)) (pow (log alpha) 2)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))
#s(approx (pow (log alpha) 2) (pow.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) #s(literal 2 binary32)))
#s(approx (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))
#s(approx (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 alpha alpha)))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (fma.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 9 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 17/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 alpha alpha) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 alpha alpha))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (+.f32 (/.f32 #s(literal 7/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 alpha alpha))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 9/2 binary32))) (*.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (+.f32 (/.f32 #s(literal 7/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (fma.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 9 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 17/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))) (*.f32 (*.f32 alpha alpha) (pow.f32 alpha #s(literal 4 binary32)))))))) (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 9/2 binary32))) (*.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 alpha alpha)))) (/.f32 #s(literal 9/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (fma.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 9 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 17/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))) (*.f32 (*.f32 alpha alpha) (pow.f32 alpha #s(literal 4 binary32))))))) (/.f32 #s(literal 9/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (fma.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 9 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 17/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))) (*.f32 (*.f32 alpha alpha) (pow.f32 alpha #s(literal 4 binary32)))))))) (/.f32 #s(literal 9/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (+.f32 (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (+.f32 (*.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (fma.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (/.f32 #s(literal 39/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (fma.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (/.f32 #s(literal 21 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (fma.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 39/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))) (fma.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (/.f32 #s(literal 21 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal -3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 12 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (fma.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 12 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (+.f32 (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (+.f32 (*.f32 #s(literal 3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 (fma.f32 #s(literal 9 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 12 binary32))) (*.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 #s(literal 3 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 25/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (/.f32 #s(literal 54 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 #s(literal 25/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 54 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (fma.f32 #s(literal 139/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 25/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 12 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))) (/.f32 #s(literal 21/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (fma.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (fma.f32 #s(literal 7 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))) (/.f32 #s(literal 21/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (fma.f32 #s(literal 7 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (*.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (*.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (/ (* alpha alpha) (* (PI) (log alpha))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (* (PI) (log alpha)) (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))
#s(approx (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (* 2 (/ 1 (* (PI) (log alpha)))) (/.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))
#s(approx (/ 1 (* (PI) (log alpha))) (/.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))) (/.f32 #s(literal 39/4 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 39/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (fma.f32 #s(literal 13/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) (*.f32 #s(literal -3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 15/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 15/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))) (/.f32 #s(literal 5 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 15/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 #s(literal 5 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (/.f32 #s(literal 15/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha))) (*.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 #s(literal 5 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (/.f32 #s(literal 9/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 #s(literal 3/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 #s(literal 3/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (/.f32 #s(literal 9/4 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (* 3/2 (/ 1 (* (PI) (log alpha)))) (/.f32 #s(literal -3/2 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/.f32 #s(literal 2 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))) (/.f32 #s(literal 6 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (/.f32 #s(literal 9/4 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 6 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (fma.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (/.f32 #s(literal 9/4 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 #s(literal 5/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 #s(literal 5/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) (*.f32 #s(literal -3/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 9/4 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))) (/.f32 #s(literal 3/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (pow.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) #s(literal 2 binary32))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (pow.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (pow.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) #s(literal 2 binary32))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 25/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (/.f32 #s(literal 51 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 #s(literal 25/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 51 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (fma.f32 #s(literal 135/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 25/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 #s(literal -4 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 (-.f32 (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (pow.f32 alpha #s(literal 4 binary32))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 (-.f32 (/.f32 #s(literal 4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (fma.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (/.f32 #s(literal 4 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (pow.f32 alpha #s(literal 4 binary32))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 (-.f32 (fma.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (pow.f32 alpha #s(literal 4 binary32))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 25/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (/.f32 #s(literal 51 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 #s(literal 25/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 51 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (fma.f32 #s(literal 135/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 25/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal -3 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 #s(literal 21 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (/.f32 #s(literal 38 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 17 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 21 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 38 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (*.f32 #s(literal -3/16 binary32) (/.f32 (pow.f32 alpha #s(literal 14 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (*.f32 (pow.f32 alpha #s(literal 14 binary32)) (-.f32 (*.f32 #s(literal 15/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32))))) (*.f32 #s(literal 3/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (*.f32 (pow.f32 alpha #s(literal 14 binary32)) (-.f32 (/.f32 #s(literal 15/16 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))) (+.f32 (/.f32 #s(literal 5/16 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))) (*.f32 #s(literal 3/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (*.f32 (pow.f32 alpha #s(literal 14 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 5/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 #s(literal 15/16 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32))))) (*.f32 #s(literal 3/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (*.f32 #s(literal -1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (*.f32 #s(literal -1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (* (pow (PI) 3) (pow (log alpha) 3)) (*.f32 #s(literal -1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))
#s(approx (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) (/.f32 #s(literal -1/8 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))
#s(approx (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))) (/.f32 #s(literal -1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 15/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 #s(literal 5/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (/.f32 #s(literal 15/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (fma.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))) (/.f32 #s(literal 15/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 15/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 #s(literal 5 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (/.f32 #s(literal 15/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 5 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))) (/.f32 #s(literal 15/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 #s(literal 5/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 #s(literal -5 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 5 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (*.f32 #s(literal 5 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (*.f32 #s(literal -3 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (pow.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) #s(literal 2 binary32))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (pow.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) #s(literal 2 binary32)))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (pow.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) #s(literal 2 binary32))))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 #s(literal 2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal -2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (*.f32 #s(literal -3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (pow.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) #s(literal 2 binary32))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (pow.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) #s(literal 2 binary32)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (pow.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) #s(literal 2 binary32))))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 1/16 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 4 binary32)))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 4 binary32)))) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 4 binary32)))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (+.f32 (/.f32 #s(literal 1/8 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 4 binary32)))) (+.f32 (/.f32 #s(literal 3/16 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 4 binary32)))) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 4 binary32))))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (+.f32 (/.f32 #s(literal 1/8 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 4 binary32)))) (fma.f32 #s(literal 3/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 4 binary32)))) (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 4 binary32)))) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 4 binary32)))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 19/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (/.f32 #s(literal 30 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 #s(literal 19/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 30 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (fma.f32 #s(literal 59/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 19/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 12 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))) (/.f32 #s(literal 21/4 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (/.f32 #s(literal 9/4 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (fma.f32 #s(literal 21/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (fma.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (/.f32 #s(literal 9/4 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 (fma.f32 #s(literal 3/4 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) #s(literal 3/4 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (*.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) #s(literal 1 binary32))) (*.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal -3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 #s(literal 12 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (/.f32 #s(literal 21 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 9 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 12 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (*.f32 #s(literal -3/8 binary32) (/.f32 (pow.f32 alpha #s(literal 10 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (*.f32 (pow.f32 alpha #s(literal 10 binary32)) (-.f32 (*.f32 #s(literal 21/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (*.f32 (pow.f32 alpha #s(literal 10 binary32)) (-.f32 (/.f32 #s(literal 21/8 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))) (/.f32 #s(literal 21/8 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (*.f32 #s(literal -3/8 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 21/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 21/8 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))) (/.f32 #s(literal 21/8 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 #s(literal 3/8 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (*.f32 #s(literal -3/8 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 9/4 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))) (/.f32 #s(literal 9/4 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) (*.f32 #s(literal -1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 5/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))) (/.f32 #s(literal 5/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 #s(literal -1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 #s(literal -3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 #s(literal 21/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (/.f32 #s(literal 39/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 17/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 21/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal -3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 #s(literal 21/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (/.f32 #s(literal 39/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 (fma.f32 #s(literal 17/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 21/2 binary32))) (*.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (*.f32 #s(literal -3/128 binary32) (/.f32 (pow.f32 alpha #s(literal 18 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32)))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (*.f32 (pow.f32 alpha #s(literal 18 binary32)) (-.f32 (*.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32))))) (*.f32 #s(literal 3/128 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32)))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (*.f32 (pow.f32 alpha #s(literal 18 binary32)) (-.f32 (/.f32 (fma.f32 #s(literal 3/64 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32))) (*.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32))) #s(literal 3/32 binary32))) (*.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32))) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32))))) (*.f32 #s(literal 3/128 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32)))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (*.f32 (pow.f32 alpha #s(literal 18 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 3/32 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32)))) (fma.f32 #s(literal 3/64 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32)))) (*.f32 #s(literal 5/128 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32))))))) (*.f32 #s(literal 3/128 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 #s(literal -1/32 binary32) (/.f32 (pow.f32 alpha #s(literal 14 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 14 binary32)) (-.f32 (*.f32 #s(literal 5/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32))))) (*.f32 #s(literal 1/32 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 14 binary32)) (-.f32 (/.f32 #s(literal 5/16 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))) (+.f32 (/.f32 #s(literal 3/16 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))) (*.f32 #s(literal 1/32 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 14 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 3/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32))) (*.f32 #s(literal 5/32 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 #s(literal 5/16 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32))))) (*.f32 #s(literal 1/32 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 #s(literal 3/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 #s(literal 5/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (/.f32 #s(literal 5/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32)))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 2 binary32))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 #s(literal -1/64 binary32) (/.f32 (pow.f32 alpha #s(literal 18 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32)))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 18 binary32)) (-.f32 (*.f32 #s(literal 3/128 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32))))) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32)))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 18 binary32)) (-.f32 (/.f32 (fma.f32 #s(literal 3/128 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32))) #s(literal 3/128 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32))))) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32)))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 18 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 3/128 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32)))) (fma.f32 #s(literal 3/128 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32)))) (*.f32 #s(literal 3/64 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32))))))) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 7 binary32)))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 10 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 10 binary32)) (-.f32 (*.f32 #s(literal 7/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 10 binary32)) (-.f32 (/.f32 #s(literal 7/8 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (+.f32 (/.f32 #s(literal 5/8 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 10 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 5/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 #s(literal 7/8 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (/.f32 #s(literal 3 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 #s(literal 9/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (/.f32 #s(literal 9/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 3/8 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 #s(literal 3/8 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5/2 binary32))) (*.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 #s(literal 7/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (fma.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (/.f32 #s(literal 7/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5/2 binary32))) (*.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 #s(literal 7/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (fma.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (/.f32 #s(literal 7/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 #s(literal 1/16 binary32) (/.f32 (pow.f32 alpha #s(literal 12 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))) (*.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32))) (*.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))))) (pow.f32 alpha #s(literal 4 binary32))) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32))))) (/.f32 #s(literal 3/32 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 5 binary32)))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 1/64 binary32) (/.f32 (pow.f32 alpha #s(literal 12 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 6 binary32)))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (fma.f32 #s(literal 3/64 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 6 binary32)))) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 6 binary32)))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (+.f32 (/.f32 #s(literal 3/64 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 6 binary32)))) (+.f32 (/.f32 #s(literal 3/32 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 6 binary32)))) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 6 binary32))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (+.f32 (/.f32 #s(literal 3/64 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 6 binary32)))) (fma.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 6 binary32)))) (fma.f32 #s(literal 7/64 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 6 binary32)))) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 6 binary32)))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 12 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))) (/.f32 #s(literal 27/8 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (fma.f32 #s(literal 27/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))) (fma.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32)))) (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 alpha alpha) (pow.f32 (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) #s(literal 3 binary32))))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 #s(literal -1/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (pow.f32 alpha #s(literal 4 binary32))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (pow.f32 alpha #s(literal 4 binary32))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (pow.f32 alpha #s(literal 4 binary32))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 cosTheta cosTheta))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (+ alpha 1) (PI)) (/.f32 alpha (PI.f32)))
#s(approx (/ (+ alpha 1) (PI)) (*.f32 alpha (/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 alpha (PI.f32)) (*.f32 (PI.f32) #s(literal 1 binary32))) (*.f32 (PI.f32) (*.f32 alpha (PI.f32))))))
#s(approx (+ alpha 1) alpha)
#s(approx (+ alpha 1) (*.f32 alpha (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) alpha))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 #s(literal -1/2 binary32) (*.f32 alpha (*.f32 (*.f32 cosTheta cosTheta) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (*.f32 cosTheta cosTheta) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) alpha))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 #s(literal 1/2 binary32) (*.f32 alpha (*.f32 (*.f32 cosTheta cosTheta) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) alpha))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 (-.f32 (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 (*.f32 alpha alpha) alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (/.f32 #s(literal 1/2 binary32) (*.f32 alpha (*.f32 (*.f32 cosTheta cosTheta) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) alpha))
#s(approx (- alpha 1) alpha)
#s(approx (- alpha 1) (*.f32 alpha (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) alpha))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 #s(literal -2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 #s(literal 0 binary32) (log.f32 alpha))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha))))))
#s(approx (log (* alpha alpha)) (*.f32 #s(literal -2 binary32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))
#s(approx (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 cosTheta cosTheta)))))
#s(approx (- (* alpha alpha) 1) (*.f32 alpha alpha))
#s(approx (- (* alpha alpha) 1) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 cosTheta cosTheta))) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 cosTheta cosTheta)) (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha))))) (/.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 cosTheta cosTheta))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 #s(literal -2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha)) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 6 binary32))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha)) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (-.f32 #s(literal 0 binary32) (log.f32 alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 4 binary32)))))))))
#s(approx (* (PI) (log (* alpha alpha))) (*.f32 #s(literal -2 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 alpha alpha) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 cosTheta cosTheta)) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (pow.f32 alpha #s(literal 4 binary32))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (*.f32 cosTheta cosTheta))) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)))))
#s(approx (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 6 binary32))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (+.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 6 binary32))) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (*.f32 (*.f32 alpha alpha) (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)) (*.f32 cosTheta cosTheta))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (pow.f32 alpha #s(literal 4 binary32))) (*.f32 cosTheta cosTheta)) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 alpha alpha)))))
#s(approx (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 6 binary32))) (+.f32 (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 6 binary32))) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 (fma.f32 (*.f32 cosTheta cosTheta) (pow.f32 alpha #s(literal 4 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32))) (*.f32 (*.f32 alpha alpha) (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 (*.f32 alpha alpha) cosTheta))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 (*.f32 alpha alpha) (+.f32 cosTheta (*.f32 #s(literal -1 binary32) (/.f32 cosTheta (*.f32 alpha alpha))))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (+.f32 cosTheta (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 cosTheta (*.f32 #s(literal -1 binary32) cosTheta)) (pow.f32 alpha #s(literal 4 binary32))))) (/.f32 cosTheta (*.f32 alpha alpha)))))
#s(approx (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) (*.f32 (*.f32 alpha alpha) (-.f32 (+.f32 cosTheta (fma.f32 #s(literal -1 binary32) (/.f32 cosTheta (pow.f32 alpha #s(literal 6 binary32))) (/.f32 cosTheta (pow.f32 alpha #s(literal 6 binary32))))) (fma.f32 #s(literal -1 binary32) (/.f32 cosTheta (pow.f32 alpha #s(literal 4 binary32))) (+.f32 (/.f32 cosTheta (*.f32 alpha alpha)) (/.f32 cosTheta (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 alpha alpha))
#s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (- (pow (* alpha alpha) 3) 1) (pow.f32 alpha #s(literal 6 binary32)))
#s(approx (- (pow (* alpha alpha) 3) 1) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (pow.f32 alpha #s(literal 6 binary32))))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (pow.f32 alpha #s(literal 4 binary32)))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (+.f32 #s(literal 1 binary32) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)) (/.f32 #s(literal 1 binary32) (pow.f32 alpha #s(literal 4 binary32)))))))
#s(approx (+ 1 (* alpha alpha)) (*.f32 alpha alpha))
#s(approx (+ 1 (* alpha alpha)) (*.f32 (*.f32 alpha alpha) (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
#s(approx (/ (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))))) (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
#s(approx (- (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1)) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) (*.f32 alpha alpha)) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))))
#s(approx (* (* alpha alpha) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
#s(approx (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (pow.f32 (exp.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha)))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (pow (* alpha alpha) (PI)) (pow.f32 (exp.f32 #s(literal -2 binary32)) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) 1) (*.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))))
#s(approx (* (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (log (pow (pow (* alpha alpha) (PI)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (*.f32 (pow.f32 (*.f32 (PI.f32) (*.f32 #s(literal 2 binary32) (log.f32 alpha))) #s(literal 2 binary32)) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 cosTheta cosTheta))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 cosTheta cosTheta)))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))))) (*.f32 #s(literal 2 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (/.f32 (fma.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))))) (*.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 #s(literal 2 binary32) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 #s(literal 2 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha))))))))
#s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (+.f32 (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))) (/.f32 (fma.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))))))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 #s(literal 2 binary32) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 cosTheta cosTheta)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 #s(literal 2 binary32) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 3 binary32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (fma.f32 #s(literal 2 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha)) (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (*.f32 (-.f32 (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))) (/.f32 (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (pow.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) #s(literal 3 binary32))) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (*.f32 #s(literal 2 binary32) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (-.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (*.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (*.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha))))))
#s(approx (- (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (+.f32 (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (*.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha)) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 17/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 9 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (pow.f32 alpha #s(literal 4 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (*.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (+.f32 (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (*.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha)) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 17/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 9 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (pow.f32 alpha #s(literal 4 binary32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (+.f32 (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (*.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha)) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 17/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 9 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (pow.f32 alpha #s(literal 4 binary32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 #s(literal 4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 4 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (*.f32 alpha alpha) (-.f32 (+.f32 (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (fma.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal 1/4 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (*.f32 alpha alpha))))))
#s(approx (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (*.f32 alpha alpha)) (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (*.f32 (PI.f32) (PI.f32)))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (PI.f32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (*.f32 (PI.f32) (PI.f32)))))))
#s(approx (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (PI.f32)))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (PI.f32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (*.f32 (PI.f32) (PI.f32))))))))
#s(approx (pow (log alpha) 3) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))
#s(approx (log alpha) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (+.f32 (/.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (/.f32 #s(literal 1/4 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (* (* (PI) (PI)) (pow (log alpha) 2)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (pow (log alpha) 2) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))
#s(approx (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (*.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha)))))
#s(approx (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (*.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha)) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 17/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 9 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (pow.f32 alpha #s(literal 4 binary32)))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (+.f32 (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 7/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (+.f32 (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 (fma.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 17/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 9 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 alpha alpha)))))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 7/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (+.f32 (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (+.f32 (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 (fma.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 17/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 9 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 alpha alpha)))))) (+.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (+.f32 (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 (fma.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 17/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 9 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 alpha alpha) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 alpha alpha)))))) (+.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (+.f32 (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 21 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (fma.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 39/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (- (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (+.f32 (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 21 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (+.f32 (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 39/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 12 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (+.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (/.f32 #s(literal 12 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (+ (* (* cosTheta cosTheta) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal -3 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (+.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))) (/.f32 (fma.f32 #s(literal 9 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) #s(literal 12 binary32))) (*.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 #s(literal -3 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 25/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (/.f32 #s(literal 25/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 54 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 139/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 25/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 54 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (*.f32 #s(literal -1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 12 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 21/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (fma.f32 #s(literal 7 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (fma.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (*.f32 #s(literal -1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 21/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 7 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (+.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (*.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ (* alpha alpha) (* (PI) (log alpha))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (* (PI) (log alpha)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))
#s(approx (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (* 2 (/ 1 (* (PI) (log alpha)))) (/.f32 #s(literal 2 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (/ 1 (* (PI) (log alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) (*.f32 #s(literal -1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 39/4 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha)))) (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 13/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 3 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (+.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 39/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 15/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (/ (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 5 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 15/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 15/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 5 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 15/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha))) (*.f32 #s(literal 3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 5 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 9/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 #s(literal 3/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 3/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 9/4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (* 3/2 (/ 1 (* (PI) (log alpha)))) (/.f32 #s(literal 3/2 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/.f32 #s(literal 2 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (*.f32 #s(literal -1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 #s(literal 9/4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 6 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 9/4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (+.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 6 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) (*.f32 #s(literal 3/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (* (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 3/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 9/4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (PI)) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (log alpha)) (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 25/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (/.f32 #s(literal 25/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 51 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 5/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 135/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 25/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 51 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 #s(literal 4 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 (-.f32 (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (pow.f32 alpha #s(literal 4 binary32))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 (-.f32 (fma.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 4 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (pow.f32 alpha #s(literal 4 binary32))))
#s(approx (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 (-.f32 (+.f32 (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (fma.f32 #s(literal 4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (pow.f32 alpha #s(literal 4 binary32))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 25/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (/.f32 #s(literal 25/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 51 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 135/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 25/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 51 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal 3 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 38 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 21 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (+.f32 (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 38 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (fma.f32 #s(literal 17 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 21 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (*.f32 #s(literal 3/16 binary32) (/.f32 (pow.f32 alpha #s(literal 14 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (*.f32 (pow.f32 alpha #s(literal 14 binary32)) (-.f32 (*.f32 #s(literal 3/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))) (*.f32 #s(literal 15/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32)))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (*.f32 (pow.f32 alpha #s(literal 14 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 5/16 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))) (*.f32 #s(literal 3/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32)))))) (/.f32 #s(literal 15/16 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (*.f32 (pow.f32 alpha #s(literal 14 binary32)) (-.f32 (fma.f32 #s(literal 5/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))) (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))) (*.f32 #s(literal 3/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))))) (/.f32 #s(literal 15/16 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3))) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (* (pow (PI) 3) (pow (log alpha) 3)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))
#s(approx (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3)))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 15/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 15/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (- (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (fma.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (/.f32 #s(literal 15/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 15/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 5 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 15/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* (pow alpha 4) (+ (* -1 (/ (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (+ (* 2 (* (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))) (* 2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2))))))) (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 5 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (/.f32 #s(literal 15/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 #s(literal 5/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 #s(literal -5 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 5 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 5 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (*.f32 #s(literal -3 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (*.f32 #s(literal -3 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (+ (* -1 (- (* 3/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))))) (* 2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 #s(literal 2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* -1 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal -2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (*.f32 #s(literal -3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha)) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 1/16 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 4 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 4 binary32))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 4 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 4 binary32))))) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 4 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 4 binary32))))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (+.f32 (/.f32 #s(literal 1/8 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 4 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 4 binary32))))) (+.f32 (/.f32 #s(literal 3/16 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 4 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 4 binary32))))) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 4 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 4 binary32)))))))))
#s(approx (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (+.f32 (/.f32 #s(literal 1/8 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 4 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 4 binary32))))) (fma.f32 #s(literal 3/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 4 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 4 binary32))))) (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 4 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 4 binary32))))) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 4 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 4 binary32))))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 19/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (/.f32 #s(literal 19/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 30 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 59/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 19/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 30 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 #s(literal -1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 12 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (*.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (/.f32 #s(literal 9/4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 21/4 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (fma.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 9/4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (+.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 21/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 (fma.f32 #s(literal 3/4 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) #s(literal 3/4 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 3/4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) #s(literal 1 binary32))) (*.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 #s(literal -3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 12 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 21 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 12 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (+.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 21 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (fma.f32 #s(literal 9 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 12 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (*.f32 #s(literal 3/8 binary32) (/.f32 (pow.f32 alpha #s(literal 10 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (*.f32 (pow.f32 alpha #s(literal 10 binary32)) (-.f32 (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 21/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))))) (*.f32 (pow.f32 alpha #s(literal 10 binary32)) (-.f32 (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 21/8 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 21/8 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (*.f32 #s(literal 3/8 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 21/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 21/8 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 21/8 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 #s(literal -3/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* 1/4 (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (*.f32 #s(literal -3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (* (* (PI) (PI)) (pow (log alpha) 2))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (*.f32 #s(literal 3/8 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 9/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha)))) (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 9/4 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 9/4 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (/ (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 39/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 21/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (+ (* 3/4 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (+.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (fma.f32 #s(literal 17/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 21/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 21/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 39/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 21/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (/ (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (-.f32 (+.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 39/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 (fma.f32 #s(literal 17/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) #s(literal 21/2 binary32))) (*.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (*.f32 #s(literal 3/128 binary32) (/.f32 (pow.f32 alpha #s(literal 18 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (*.f32 (pow.f32 alpha #s(literal 18 binary32)) (-.f32 (*.f32 #s(literal 3/128 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32))))) (*.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32)))))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (*.f32 (pow.f32 alpha #s(literal 18 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (*.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32))))) (*.f32 #s(literal 3/64 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32))))))) (*.f32 alpha alpha)) (*.f32 #s(literal 3/128 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32))))))))
#s(approx (+ (* (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))))) (*.f32 (pow.f32 alpha #s(literal 18 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (*.f32 #s(literal 3/64 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32))))) (*.f32 #s(literal 5/128 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32))))))) (pow.f32 alpha #s(literal 4 binary32))) (*.f32 #s(literal 3/128 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32)))))) (/.f32 #s(literal 3/32 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 #s(literal 1/32 binary32) (/.f32 (pow.f32 alpha #s(literal 14 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 14 binary32)) (-.f32 (*.f32 #s(literal 1/32 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))) (*.f32 #s(literal 5/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32)))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 14 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 3/16 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))) (*.f32 #s(literal 1/32 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32)))))) (/.f32 #s(literal 5/16 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 14 binary32)) (-.f32 (fma.f32 #s(literal 3/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))) (fma.f32 #s(literal 5/32 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))) (*.f32 #s(literal 1/32 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))))) (/.f32 #s(literal 5/16 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 3/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 #s(literal 1/64 binary32) (/.f32 (pow.f32 alpha #s(literal 18 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 18 binary32)) (-.f32 (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32))))) (*.f32 #s(literal 3/128 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32)))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 18 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (*.f32 #s(literal 3/128 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32))))) (*.f32 #s(literal 3/128 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32))))))) (*.f32 alpha alpha)) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))))) (*.f32 (pow.f32 alpha #s(literal 18 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (*.f32 #s(literal 3/128 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32))))) (+.f32 (/.f32 #s(literal 3/128 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32))))) (*.f32 #s(literal 3/64 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32)))))))) (*.f32 alpha alpha)) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 7 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 7 binary32))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 10 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 10 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 7/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 10 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 5/8 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (/.f32 #s(literal 7/8 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 10 binary32)) (-.f32 (fma.f32 #s(literal 5/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (/.f32 #s(literal 7/8 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal -3/2 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 9/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 9/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 3 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (*.f32 #s(literal 3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 #s(literal 9/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal -3/8 binary32) (/.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (-.f32 (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 #s(literal -3/8 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2))) (*.f32 (*.f32 alpha alpha) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 7/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 #s(literal 7/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (*.f32 #s(literal 7/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (/.f32 #s(literal 7/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))) (/.f32 #s(literal 5/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (*.f32 #s(literal 5/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 #s(literal 7/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 #s(literal -1/16 binary32) (/.f32 (pow.f32 alpha #s(literal 12 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (*.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32)))))) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (/.f32 (fma.f32 #s(literal 3/32 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32)))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32)))) #s(literal 3/32 binary32))) (*.f32 (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32)))))) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))))))
#s(approx (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (+.f32 (/.f32 #s(literal 3/32 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))) (fma.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32)))))))) (*.f32 #s(literal 1/16 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 5 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 5 binary32))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 #s(literal 1/64 binary32) (/.f32 (pow.f32 alpha #s(literal 12 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 6 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 6 binary32))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (fma.f32 #s(literal 3/64 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 6 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 6 binary32))))) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 6 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 6 binary32))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (+.f32 (/.f32 #s(literal 3/64 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 6 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 6 binary32))))) (+.f32 (/.f32 #s(literal 3/32 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 6 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 6 binary32))))) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 6 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 6 binary32)))))))))
#s(approx (* (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (+.f32 (/.f32 #s(literal 3/64 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 6 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 6 binary32))))) (fma.f32 #s(literal 3/32 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 6 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 6 binary32))))) (fma.f32 #s(literal 7/64 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 6 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 6 binary32))))) (*.f32 #s(literal 1/64 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 6 binary32)) (pow.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) #s(literal 6 binary32))))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 #s(literal -1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 12 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (fma.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (/.f32 #s(literal 27/8 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (* (- (+ (* 3/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (pow alpha 4) (+ (* -1 (/ (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha))))) (* (PI) (log alpha)))) (+ (* 3/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))))))) (* -1/2 (- (* (/ (* alpha alpha) (PI)) (/ (+ (* -1 (- (/ (* alpha alpha) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))))) (* 3/2 (/ 1 (* (PI) (log alpha))))) (log alpha))) (* -1 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (- (/ (* (pow alpha 6) (+ (* 1/4 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/2 (/ (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha)))) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))) (+ (* 3/8 (/ 1 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))))))) (/ (* (- (* 1/8 (/ (pow alpha 6) (* (pow (PI) 3) (pow (log alpha) 3)))) (* 1/8 (/ 1 (* (pow (PI) 3) (pow (log alpha) 3))))) (- (+ (* 1/2 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (/ (* (pow alpha 4) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha)))) (* -1/2 (- (/ (* (* alpha alpha) (+ (* -1/2 (/ (* alpha alpha) (* (PI) (log alpha)))) (/ 1 (* (PI) (log alpha))))) (* (PI) (log alpha))) (* -1/2 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (* (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2))))) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))))) (*.f32 (pow.f32 alpha #s(literal 12 binary32)) (-.f32 (fma.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 3/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (fma.f32 #s(literal 27/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (*.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (pow.f32 alpha #s(literal 4 binary32))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))) (pow.f32 alpha #s(literal 4 binary32))))
#s(approx (/ 1/8 (* (pow (PI) 3) (* (pow (log alpha) 3) (- (+ (* 1/4 (/ 1 (* (* (PI) (PI)) (pow (log alpha) 2)))) (* 1/4 (/ (pow alpha 4) (* (* (PI) (PI)) (pow (log alpha) 2))))) (* -1/4 (/ (* alpha alpha) (* (* (PI) (PI)) (pow (log alpha) 2)))))))) (/.f32 (-.f32 (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 alpha #s(literal 8 binary32)) (*.f32 (PI.f32) (+.f32 (log.f32 #s(literal -1 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -1 binary32)))))))))) (pow.f32 alpha #s(literal 4 binary32))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))))
#s(approx (* (/ (+ alpha 1) (PI)) (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)))) (-.f32 (+.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (/.f32 (*.f32 (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)) (+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (pow.f32 cosTheta #s(literal 4 binary32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (/.f32 #s(literal -1/2 binary32) (*.f32 alpha (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (/.f32 #s(literal -1 binary32) alpha))))))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (/.f32 #s(literal -1 binary32) alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (/.f32 #s(literal -1 binary32) alpha))))))) alpha)))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 alpha (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (/.f32 #s(literal -1 binary32) alpha))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (/.f32 #s(literal -1 binary32) alpha)))))) alpha) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (/.f32 #s(literal -1 binary32) alpha)))))) alpha)))
#s(approx (/ (- alpha 1) (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1))) (*.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 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (/.f32 #s(literal -1 binary32) alpha)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 alpha (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (/.f32 #s(literal -1 binary32) alpha))))))) alpha) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (/.f32 #s(literal -1 binary32) alpha)))))) alpha) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (/.f32 #s(literal -1 binary32) alpha)))))) alpha)))
#s(approx (- alpha 1) (*.f32 #s(literal -1 binary32) (*.f32 alpha (-.f32 (/.f32 #s(literal 1 binary32) alpha) #s(literal 1 binary32)))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 #s(literal -2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (/.f32 #s(literal -1 binary32) alpha))))))
#s(approx (* (log (* alpha alpha)) (+ (* (* cosTheta cosTheta) (- (* alpha alpha) 1)) 1)) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (/.f32 #s(literal -1 binary32) alpha))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha))))))
#s(approx (log (* alpha alpha)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) #s(literal -2 binary32))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (/.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))) (/.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 cosTheta cosTheta))) (pow.f32 alpha #s(literal 4 binary32))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (+.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 cosTheta cosTheta)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))) (/.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 cosTheta cosTheta))) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 cosTheta cosTheta)) (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (pow.f32 alpha #s(literal 6 binary32))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 alpha alpha) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32))))) (/.f32 (*.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (pow.f32 cosTheta #s(literal 4 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 cosTheta cosTheta))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 #s(literal -2 binary32) (*.f32 (*.f32 alpha alpha) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) (*.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha)) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 4 binary32))))))))
#s(approx (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta))) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -2 binary32) (*.f32 (*.f32 cosTheta cosTheta) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 6 binary32))) (fma.f32 #s(literal -2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 alpha alpha)) (*.f32 #s(literal 2 binary32) (/.f32 (*.f32 (PI.f32) (*.f32 (log.f32 (/.f32 #s(literal -1 binary32) alpha)) (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)))) (pow.f32 alpha #s(literal 4 binary32)))))))))
#s(approx (* (PI) (log (* alpha alpha))) (*.f32 #s(literal -2 binary32) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))
#s(approx (pow (* alpha alpha) (PI)) (pow.f32 (exp.f32 #s(literal -2 binary32)) (log.f32 (pow.f32 (/.f32 #s(literal -1 binary32) alpha) (PI.f32)))))

eval51.7s (55.1%)

Memory
566.1MiB live, 82 491.1MiB allocated; 19.7s collecting garbage
Compiler

Compiled 71 708 235 to 161 719 computations (99.8% saved)

prune30.1s (32.1%)

Memory
218.6MiB live, 45 462.7MiB allocated; 4.3s collecting garbage
Pruning

9 alts after pruning (0 fresh and 9 done)

PrunedKeptTotal
New16 129016 129
Fresh000
Picked044
Done055
Total16 129916 138
Accuracy
100.0%
Counts
16 138 → 9
Alt Table
Click to see full alt table
StatusAccuracyProgram
✓98.6%
(/.f32 (/.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
✓98.2%
(/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) #s(literal 1 binary32))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))))
✓98.2%
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta))))
✓98.2%
(/.f32 #s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
✓98.3%
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
✓98.1%
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (PI.f32)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
✓95.7%
(*.f32 #s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha)))))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
✓97.8%
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
✓97.2%
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
Compiler

Compiled 11 646 to 803 computations (93.1% saved)

regimes25.0ms (0%)

Memory
42.6MiB live, 42.6MiB allocated; 0ms collecting garbage
Counts
19 → 1
Calls
Call 1
Inputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
(*.f32 #s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha)))))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (PI.f32)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (/.f32 (/.f32 (fma.f32 (*.f32 alpha alpha) alpha #s(literal 1 binary32)) (fma.f32 alpha alpha (-.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(-.f32 (/.f32 (/.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))) (/.f32 (/.f32 (/.f32 #s(literal 1 binary32) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 #s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (+.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) #s(literal 1 binary32))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
(/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) #s(literal 1 binary32))) (*.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))))
(/.f32 (-.f32 (+.f32 (cosh.f32 (log.f32 (*.f32 alpha alpha))) (sinh.f32 (log.f32 (*.f32 alpha alpha)))) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
(/.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 2 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 alpha) (neg.f32 alpha) #s(literal 1 binary32))) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
(/.f32 (/.f32 (/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))
Outputs
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (+.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) #s(literal 1 binary32))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
Calls

4 calls:

5.0ms
alpha
5.0ms
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
5.0ms
(*.f32 alpha alpha)
5.0ms
cosTheta
Results
AccuracySegmentsBranch
98.6%1(*.f32 alpha alpha)
98.6%1(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
98.6%1cosTheta
98.6%1alpha
Compiler

Compiled 29 to 20 computations (31% saved)

regimes21.0ms (0%)

Memory
-14.4MiB live, 33.1MiB allocated; 0ms collecting garbage
Counts
14 → 1
Calls
Call 1
Inputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
(*.f32 #s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha)))))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (PI.f32)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (/.f32 (/.f32 (fma.f32 (*.f32 alpha alpha) alpha #s(literal 1 binary32)) (fma.f32 alpha alpha (-.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(-.f32 (/.f32 (/.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))) (/.f32 (/.f32 (/.f32 #s(literal 1 binary32) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 #s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
Outputs
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
Calls

4 calls:

4.0ms
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
4.0ms
alpha
4.0ms
(*.f32 alpha alpha)
4.0ms
cosTheta
Results
AccuracySegmentsBranch
98.4%1(*.f32 alpha alpha)
98.4%1(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
98.4%1cosTheta
98.4%1alpha
Compiler

Compiled 29 to 20 computations (31% saved)

regimes22.0ms (0%)

Memory
13.4MiB live, 57.9MiB allocated; 3ms collecting garbage
Counts
13 → 1
Calls
Call 1
Inputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
(*.f32 #s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha)))))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (PI.f32)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (/.f32 (/.f32 (fma.f32 (*.f32 alpha alpha) alpha #s(literal 1 binary32)) (fma.f32 alpha alpha (-.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(-.f32 (/.f32 (/.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))) (/.f32 (/.f32 (/.f32 #s(literal 1 binary32) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 #s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) #s(approx (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1))) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta))))
Outputs
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
Calls

4 calls:

6.0ms
alpha
4.0ms
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
4.0ms
(*.f32 alpha alpha)
4.0ms
cosTheta
Results
AccuracySegmentsBranch
98.4%1(*.f32 alpha alpha)
98.4%1(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
98.4%1cosTheta
98.4%1alpha
Compiler

Compiled 29 to 20 computations (31% saved)

regimes19.0ms (0%)

Memory
-19.3MiB live, 33.7MiB allocated; 0ms collecting garbage
Counts
11 → 1
Calls
Call 1
Inputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
(*.f32 #s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha)))))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (PI.f32)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (/.f32 (/.f32 (fma.f32 (*.f32 alpha alpha) alpha #s(literal 1 binary32)) (fma.f32 alpha alpha (-.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(-.f32 (/.f32 (/.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))) (/.f32 (/.f32 (/.f32 #s(literal 1 binary32) (PI.f32)) (log.f32 (*.f32 alpha alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(/.f32 #s(approx (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) (*.f32 (*.f32 alpha alpha) (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) (*.f32 alpha alpha))))) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
Outputs
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
Calls

4 calls:

3.0ms
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
3.0ms
alpha
3.0ms
(*.f32 alpha alpha)
3.0ms
cosTheta
Results
AccuracySegmentsBranch
98.3%1(*.f32 alpha alpha)
98.3%1(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
98.3%1cosTheta
98.3%1alpha
Compiler

Compiled 29 to 20 computations (31% saved)

regimes14.0ms (0%)

Memory
21.7MiB live, 21.7MiB allocated; 0ms collecting garbage
Counts
7 → 1
Calls
Call 1
Inputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
(*.f32 #s(approx (/ (+ alpha 1) (log (pow (pow alpha (PI)) 2))) (*.f32 alpha (+.f32 (/.f32 #s(literal 1 binary32) (log.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))))) (/.f32 #s(literal 1 binary32) (log.f32 (pow.f32 (exp.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 (PI.f32) (-.f32 #s(literal 0 binary32) (log.f32 alpha)))) #s(literal 2 binary32))) alpha)))))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (PI.f32)) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (*.f32 (log.f32 (*.f32 alpha alpha)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32)))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (-.f32 alpha #s(literal 1 binary32)) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
Outputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
Calls

4 calls:

3.0ms
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
3.0ms
alpha
2.0ms
(*.f32 alpha alpha)
2.0ms
cosTheta
Results
AccuracySegmentsBranch
98.3%1(*.f32 alpha alpha)
98.3%1(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
98.3%1cosTheta
98.3%1alpha
Compiler

Compiled 29 to 20 computations (31% saved)

regimes11.0ms (0%)

Memory
-29.8MiB live, 17.6MiB allocated; 1ms collecting garbage
Counts
3 → 1
Calls
Call 1
Inputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
Outputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
Calls

4 calls:

2.0ms
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
2.0ms
alpha
2.0ms
(*.f32 alpha alpha)
2.0ms
cosTheta
Results
AccuracySegmentsBranch
98.2%1(*.f32 alpha alpha)
98.2%1(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
98.2%1cosTheta
98.2%1alpha
Compiler

Compiled 29 to 20 computations (31% saved)

regimes9.0ms (0%)

Memory
15.6MiB live, 15.6MiB allocated; 0ms collecting garbage
Counts
2 → 1
Calls
Call 1
Inputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
Outputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
Calls

4 calls:

1.0ms
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
1.0ms
alpha
1.0ms
(*.f32 alpha alpha)
1.0ms
cosTheta
Results
AccuracySegmentsBranch
97.8%1cosTheta
97.8%1(*.f32 alpha alpha)
97.8%1(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
97.8%1alpha
Compiler

Compiled 29 to 20 computations (31% saved)

regimes10.0ms (0%)

Memory
15.4MiB live, 15.4MiB allocated; 0ms collecting garbage
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
Outputs
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
Calls

4 calls:

1.0ms
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
1.0ms
alpha
1.0ms
(*.f32 alpha alpha)
1.0ms
cosTheta
Results
AccuracySegmentsBranch
97.2%1(*.f32 alpha alpha)
97.2%1(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
97.2%1cosTheta
97.2%1alpha
Compiler

Compiled 29 to 20 computations (31% saved)

simplify69.0ms (0.1%)

Memory
-22.6MiB live, 70.6MiB allocated; 3ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
03165673
15965571
219695480
Stop Event
1×node limit
Calls
Call 1
Inputs
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (+.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) #s(literal 1 binary32))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
Outputs
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (+.f32 (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) #s(literal 1 binary32))) (log.f32 (pow.f32 (pow.f32 (*.f32 alpha alpha) (PI.f32)) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)))))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (neg.f32 (*.f32 alpha alpha)) (neg.f32 (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 alpha alpha) #s(literal 1 binary32))))) cosTheta) cosTheta))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (/.f32 (-.f32 (pow.f32 (*.f32 alpha alpha) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (*.f32 #s(literal -1 binary32) (*.f32 alpha alpha)) (*.f32 #s(literal -1 binary32) (*.f32 alpha alpha)) (+.f32 #s(literal 1 binary32) (*.f32 alpha alpha)))) cosTheta) cosTheta))))
(/.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) (*.f32 (*.f32 (PI.f32) (log.f32 (*.f32 alpha alpha))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) cosTheta) cosTheta))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) (*.f32 alpha #s(literal 1 binary32))))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
(*.f32 (/.f32 (+.f32 alpha #s(literal 1 binary32)) (log.f32 (pow.f32 (pow.f32 alpha (PI.f32)) #s(literal 2 binary32)))) (/.f32 (/.f32 (-.f32 (*.f32 (*.f32 alpha alpha) alpha) #s(literal 1 binary32)) (fma.f32 alpha alpha (+.f32 #s(literal 1 binary32) alpha))) (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 alpha alpha) #s(literal 1 binary32)) #s(literal 1 binary32))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta))) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta)))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (/ (- (pow (* alpha alpha) 3) 1) (+ (* (neg (* alpha alpha)) (neg (* alpha alpha))) (+ 1 (* (* alpha alpha) 1)))) cosTheta) cosTheta)))) (-.f32 (*.f32 (*.f32 alpha alpha) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))))) (*.f32 (*.f32 alpha alpha) (-.f32 (*.f32 (*.f32 #s(literal -1 binary32) (*.f32 alpha alpha)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) #s(literal 2 binary32)))))))) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) #s(literal 2 binary32)))))))) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))))) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))) (*.f32 #s(literal -1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) #s(literal 2 binary32))))))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 cosTheta cosTheta) (*.f32 cosTheta cosTheta)) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) #s(literal 2 binary32))))) (/.f32 (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) #s(literal 2 binary32)))))))) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cosTheta cosTheta) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (pow.f32 (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta)) #s(literal 2 binary32)))))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (*.f32 (log.f32 alpha) (-.f32 #s(literal 1 binary32) (*.f32 cosTheta cosTheta))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (fma.f32 (fma.f32 (/.f32 (*.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32)) (pow.f32 (*.f32 alpha cosTheta) #s(literal 1 binary32))) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (/.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 cosTheta cosTheta)) (*.f32 (*.f32 (log.f32 alpha) (PI.f32)) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) (/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) #s(literal 3 binary32))) (+.f32 (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha))) (-.f32 (*.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))))) (*.f32 (*.f32 (fma.f32 (/.f32 (*.f32 (pow.f32 (*.f32 alpha cosTheta) #s(literal 2 binary32)) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))) #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)))) (*.f32 (/.f32 #s(literal -1/2 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 (*.f32 cosTheta cosTheta) (pow.f32 (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32)) #s(literal 2 binary32)))))) (*.f32 alpha alpha)) (*.f32 #s(literal -1/2 binary32) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 (log.f32 alpha) (PI.f32))) (/.f32 #s(literal 1 binary32) (fma.f32 (*.f32 cosTheta cosTheta) #s(literal -1 binary32) #s(literal 1 binary32))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))
#s(approx (/ (- (* alpha alpha) 1) (* (* (PI) (log (* alpha alpha))) (+ 1 (* (* (- (* alpha alpha) 1) cosTheta) cosTheta)))) #s(approx (/ (+ (pow (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) 3) (pow (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) 3)) (+ (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha))) (- (* (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))))) (* (* (+ (* (/ (* (pow (* alpha cosTheta) 2) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (+ (* (* cosTheta cosTheta) -1) 1)) -1) (- (* (/ 1/2 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1))) (* (/ -1/2 (* (log alpha) (PI))) (/ (* cosTheta cosTheta) (pow (+ (* (* cosTheta cosTheta) -1) 1) 2))))) (* alpha alpha)) (* -1/2 (* (/ 1 (* (log alpha) (PI))) (/ 1 (+ (* (* cosTheta cosTheta) -1) 1)))))))) (-.f32 (fma.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (fma.f32 (*.f32 cosTheta cosTheta) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1 binary32))) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1 binary32))) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (PI.f32)) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (log.f32 alpha))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 5/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (+.f32 (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1 binary32))) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 2 binary32) (*.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (*.f32 #s(literal 3/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1 binary32))) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 #s(literal 2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (-.f32 (*.f32 (neg.f32 (/.f32 (*.f32 alpha alpha) (PI.f32))) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (/.f32 (fma.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1 binary32))) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1 binary32))) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (fma.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 3/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (fma.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))))))) (*.f32 #s(literal -1/2 binary32) (-.f32 (*.f32 (/.f32 (*.f32 alpha alpha) (PI.f32)) (/.f32 (fma.f32 #s(literal -1 binary32) (-.f32 (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 #s(literal 3/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1 binary32))) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (-.f32 (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))) (*.f32 (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 6 binary32)) (fma.f32 #s(literal 1/4 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))) (fma.f32 #s(literal 3/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (/.f32 (*.f32 (-.f32 (*.f32 #s(literal 1/8 binary32) (/.f32 (pow.f32 alpha #s(literal 6 binary32)) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32))))) (*.f32 #s(literal 1/8 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (pow.f32 (log.f32 alpha) #s(literal 3 binary32)))))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (/.f32 (*.f32 (pow.f32 alpha #s(literal 4 binary32)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha)))) (*.f32 #s(literal -1/2 binary32) (-.f32 (/.f32 (*.f32 (*.f32 alpha alpha) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (PI.f32) (log.f32 alpha))) (/.f32 #s(literal 1 binary32) (*.f32 (PI.f32) (log.f32 alpha))))) (*.f32 (PI.f32) (log.f32 alpha))) (*.f32 (neg.f32 (*.f32 #s(literal -1 binary32) #s(literal -1/2 binary32))) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))) (*.f32 (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))))))))) (/.f32 #s(literal 1/8 binary32) (*.f32 (pow.f32 (PI.f32) #s(literal 3 binary32)) (*.f32 (pow.f32 (log.f32 alpha) #s(literal 3 binary32)) (-.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 alpha #s(literal 4 binary32)) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32)))))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alpha alpha) (*.f32 (*.f32 (PI.f32) (PI.f32)) (pow.f32 (log.f32 alpha) #s(literal 2 binary32))))))))))))

derivations255.0ms (0.3%)

Memory
-5.1MiB live, 88.7MiB allocated; 20ms collecting garbage
Stop Event
1×done
Compiler

Compiled 5 800 to 324 computations (94.4% saved)

preprocess128.0ms (0.1%)

Memory
21.3MiB live, 315.1MiB allocated; 9ms collecting garbage
Remove

(abs alpha)

(abs cosTheta)

Compiler

Compiled 12 392 to 1 034 computations (91.7% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...